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

Составить программу которая вводит и суммирует целые числа a, пока a не равно 999. Последний итог суммирования выводится на экран. Даю 50
баллов!

Задать свой вопрос
Воднеев Валера
Числа вводятся с клавиатуры либо выбираются случайным образом?
1 ответ

program raf105;

var a,b:integer;

begin

writeln('Вводите целые числа по очереди');

while alt;999 do

begin

 readln(b);

 a:= a+b;

end;

writeln('Заключительный итог суммирования: ',a);

end.

Написано на языке PascalABC.NET

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


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

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

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

Войти на сайт