Question

составьие блок-схему и напишите программу вывода на экран:
5 первых нечётных натуральных чисел.

Answer 1

Program prim;var i,x : integer;beginx:=1;for i:=1 to 5 dobegin write (x,'  ');x:=x+2;end;end. 

Answer 2

var i, c: integer;
begin
     c := 1;
     while (i < 5) do
     begin
          writeln(c);
          i := i + 1;
          c := c + 2;
     end;
end.

Проверил=)