Постройте команду Робот в программе Кумир. Даю 40б

32 - вопроса, 32 - ответа

var s,r: real;

begin

  read(r);

  s: =pi*sqr(r);

  writeln(s: 0: 4);

end.

заражоный диск или инет захват не заражоных файлов удаляет или заменяет их установить антивирусник . всегда проверять вайлы антивирусом

var

i,n: integer;

begin

read(n);

for i: =0 to 3 do

writeln (4*n-i);

end.