Свывести таблицу квадратов чисел от 0 до 2 с шагом 0,2. (pascal)

baltika9 baltika9    2   31.03.2019 13:09    1

Ответы
Tigor111 Tigor111  27.05.2020 22:52

var i:real;

begin

  i:=0;

  while i<=2 do

  begin

     writeln(i:4,'*',i,'=',i*i);

     i:=i+0.2;

  end;

end.

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