Программа, которая выводит на экран первые пять натуральных чисел. program _1; var i: integer; begin for i: =1 to 5 do writeln (i); writeln ('программа выполнена'); readln; end. 1. изменить программу так, чтобы она выводила произвольное количество цифр (число n).
program _1;
var
i, N: Integer;
begin
readln(N);
for i := 1 to N do
writeln(i);
writeln('программа выполнена');
readln;
end.
как лучший