Определите сумму всех элементов последовательности, завершающейся числом 0. числа, следующие за нулем, считывать не нужно. входные данные вводится последовательность целых чисел, оканчивающаяся числом 0 (само число 0 в последовательность не входит). выходные данные выведите ответ на . примеры входные данные 1 7 9 0 выходные данные 17
mrsuper773outlookcom
1
27.06.2019 15:20
12
Другие вопросы по теме Информатика
faridudin
08.09.2019 01:10
071900000719
08.09.2019 01:10
АНДРЕЙ22855555
28.04.2020 12:27
timirshan
09.06.2021 05:39
LinaDanilinovskaya
09.06.2021 06:13
Буся2212
14.11.2020 12:18
missm0541
14.11.2020 12:18
ygorbrusnyak
14.11.2020 12:19
vasilchukanna1
02.03.2021 10:21
Популярные вопросы
- Чем отличалась крестьянская пища от пищи богатых людей...
2 - Як бавілі час людзі ў часы Старажытнай Русі...
1 - Почему территория Беларуси долгое время не заселялась людьми?...
1 - Как проводили время люди во времена Древней Руси...
1 - Перечислите вооружение воинов Древней Руси...
1 - Пералічыце ўзбраенне воінаў Старажытнай Русі...
1 - Як выглядала жыллё сялян і баяр...
3 - Як ствараліся рукапісныя кнігі...
2 - Как назывались поселения крестьян...
1 - Чым адрознівалася сялянская ежа ад ежы багатых людзей...
1
var
a,s : integer;
begin
s := 0;
readln (a);
While a <> 0 do
begin
s := s +a;
readln (a);
end;
writeln (s);
end.