Как в паскале abc сделать таблицу умножения четных чисел
Как в паскале abc сделать таблицу умножения четных чисел
Гость
Ответ(ы) на вопрос:
Гостьconst N = 5;
var x, y: integer;
begin
for y := 1 to N do begin
for x := 1 to N do
write(String.Format('{0,2}*{1,2}={2,3} ', 2*x, 2*y, 4*x*y));
writeln;
end;
end.
Не нашли ответ?
Похожие вопросы