Предмет:
ИнформатикаАвтор:
ricardohcryАвтор:
pearlhickmanАвтор:
frankfurterОтвет:
Объяснение:
var n,i:integer;
begin
write('Введите N ');
readln(n);
for i:=1 to n do
writeln(i,'^2= ',sqr(i));
readln;
end.
Если уж совсем просто, то:
var n,i:integer;
begin
write('Введите N ');
readln(n);
for i:=1 to n do
writeln(i*i);
readln;
end.
Автор:
shayleeДобавить свой ответ
Предмет:
ЛитератураАвтор:
aristidesОтветов:
Смотреть
Предмет:
МатематикаАвтор:
cainОтветов:
Смотреть
Предмет:
ЛитератураАвтор:
rosie62Ответов:
Смотреть
Предмет:
МатематикаАвтор:
bethanyg1oiОтветов:
Смотреть