Вывести на экран квадраты чисел от 1 до 10 в программе паскаль

8 Окт 2019 в 03:48
284 +3
1
Ответы
1

program SquareNumbers;

var
i: Integer;

begin
for i := 1 to 10 do
begin
writeln('Square of ', i, ' is: ', i * i);
end;
end.

19 Апр 2024 в 13:15
Не можешь разобраться в этой теме?
Обратись за помощью к экспертам
Гарантированные бесплатные доработки в течение 1 года
Быстрое выполнение от 2 часов
Проверка работы на плагиат
Поможем написать учебную работу
Прямой эфир