Question

ПОМОГИТЕ ПОЖАЛУЙСТА!!!!
написать программу на языке Паскаль: С помощью цикла с предусловием вывести все цифры от 0 до числа, введённого с клавиатуры.

Answer 1

var i, n : integer;

begin

 i := 0;

 readln(n);

 while i <= n do

 begin

   writeln(i);

   i := i + 1;

 end;

end.