Головна » Статті » Pascal » Приклади програм

Таблиця множення Pascal
program table;
uses crt;
var i, j: integer;
    x:real;
begin
  clrscr;
  for i:=1 to 9 do
  begin
    {виводимо чергову табличку}
    for j:=1 to 9 do writeln(i,'*', j, '=', i*j);
    {відділяємо її дінією}
    for j:=1 to 25 do write('-');
    writeln('-');
  end;

  readln(x);

end.

 
Категорія: Приклади програм | Додав: Lord_Adwond (30-07-2018) | Автор: Lord_Adwond
Переглядів: 272 | Теги: Таблиця множення, вкладені цикли, Pascal | Рейтинг: 0.0/0
Всього коментарів: 0
avatar