Вывести на экран в строку через пробел квадраты нечётных чисел от 301 до 201​

H1biki H1biki    1   08.10.2019 04:40    0

Ответы
Стонт2132 Стонт2132  10.10.2020 03:20

var i:integer;

begin

 i:=301;

 while i>=201 do

 begin

   write(sqr(i),' ');

   dec(i,2);

 end;

 readln;

end.

ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика