Question

напишите циклический алгоритм и укажите в нем тело цикла

Answer 1

var i: integer;
begin
     for i := 0 to 30 do
     begin          //
         writeln(i); //тело цикла=)
     end;           //
end.