Программка, которая выводит на экран 1-ые 5 естественных чисел. program _1;

Программа, которая выводит на экран 1-ые пять натуральных чисел.

program _1;

var i: Integer;

begin

for i:=1 to 5 do

writeln (i);

writeln ('программа выполнена');

readln;

end.

Задание 1. Поменять программку так, чтоб она выводила случайное количество цифр (число N).

Задать свой вопрос
1 ответ

program _1;

var

   i, N: Integer;

begin

   readln(N);

   for i := 1 to N do  

       writeln(i);  

   writeln('программа выполнена');  

   readln;  

end.  

пж как наилучший

Инна Бернард
кстати заключительный readln не очень нужен
, оставишь ответ?
Имя:*
E-Mail:


Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт