Вывести на экран таблицу умножения 10*10 чисел
Вывести на экран таблицу умножения 10*10 чисел
Гость
Ответ(ы) на вопрос:
Гостьvar i, j : integer;
begin
for i := 1 to 10 do begin
for j := 1 to 10 do begin
write(i * j);
if (j = 10) then writeln()
else write(' ');
end;
end;
end.
Не нашли ответ?
Похожие вопросы