Написать программу выводящую на экран таблицу квадратов чисел от 1 до 20
Написать программу выводящую на экран таблицу квадратов чисел от 1 до 20
Гость
Ответ(ы) на вопрос:
ГостьVar i : Integer;
Begin
For i:=1 to 20 do Writeln(i,'^2 = ',sqr(i));
end.
Не нашли ответ?
Похожие вопросы