Question

Помогите пожалуйста...................

Answer 1

Ответ:

Программы на 1 и 4 задание

Объяснение:

1)

var r:integer;

begin

 readln(r);

 writeln(Pi*r*r);

end.

4)

begin

 for var i:=0 to 20 do

   writeln(10*(i/2),' ');

end.