Написать программку ввода неопределенного ряда целых чисел до тех пор,пока не

Написать программку ввода неопределенного ряда целых чисел до тех пор,пока не будет введена 1. После ввода 1,программка должна вывести сообщение программка окончена

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

program raf105;

var a:integer;

begin

while alt;gt;1 do

readln(a);

writeln('Программка закончена');

end.

Язык программирования PascalABC

, оставишь ответ?
Имя:*
E-Mail:


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

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

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

Войти на сайт