Составить программу печатающую квадрата всех натуральных чисел от 0 до заданного натурального n

maivina7777777 maivina7777777    3   02.09.2019 03:20    16

Ответы
1Маргарет1 1Маргарет1  06.10.2020 11:00
Var a, i:integer;
begin
write('Введите конечное число: ');
readln(a);
for i := 0 to a do writeln(i,'² = ',sqr(i))
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика