Как с цикла while вывести на экран квадраты всех цифр

azalhanovahalid azalhanovahalid    3   24.07.2019 20:50    0

Ответы
Zver7777 Zver7777  24.09.2020 08:24
{PascalABC}

var a:integer;
begin
while a<10 do begin
write(a*a,'  ');
a:=a+1;
end;
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика