Напечатать на экран 1 3 5 7 9 используя цикл for.

program first; var i,a,b: integer; begin  cls;   read(a,b,i);   if a< 0 then write(sqr(a));

  if b< 0 then write(sqr(b));

  if i< 0 then write(sqr(i))end.

var

  x: real;

begin

  readln(x);

writeln(x: 0: 0);

end.

мы заметили закономерность- с каждым днем кол-во ряски увеличивается в 2 раза.30 июня ряска покрыла всю поверхность озера ===> половина озера была покрыта ряской 29 июня.

954-459=495

все условия соблюдены