Question

Составьте блок схему алгоритма и программу вывода на экран всех нечетных двузначных чисел

Answer 1

Var i:integer;
begin
i:=1;
while i<100 do
  begin
  write(i,' ');
  i:=i+2
  end
end.