1. Информатика
  2. Дана непустая последовательность

Дана непустая последовательность целых чисел, оканчивающаяся нулем. найти: сумму всех чисел последовательности. входные данные: 12, 4, 8, 0 выходные данные: 24

SirErikBoss SirErikBoss    1   25.09.2019 21:30    3

Ответы
vikakivi1206 vikakivi1206  08.10.2020 19:20
PascalABC.NET 3.3.5, сборка 1662 от 29.04.2018
Внимание! Если программа не работает, обновите версию!

begin
  ReadSeqIntegerWhile(t->t<>0).Sum.Println
end.

Дана непустая последовательность целых чисел, оканчивающаяся нулем. найти: сумму всех чисел последов
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
Торт123 Торт123  07.12.2021 03:05
, просто объясните, что происходит в этих строчках В задаче идёт сжатие массива, удаляя числа из интервала [a,b], заменяя их на нули.Интересует то, что означает a[i-j] , i=n-j...
tryx3 tryx3  07.12.2021 03:04
Как удалить из предложения слова, содержащие прописные буквы. (Pascal) Код. Пример: Привет как дела? . Нужно что слово Привет было удалено. И так все слова, которые имею заглавные...
дРуЗьЯ007 дРуЗьЯ007  07.12.2021 01:48
Какая это оценка в сетевичке 273.00...
vadimkaIVA vadimkaIVA  30.05.2023 12:37
В любом режиме изменить положение камеры можно только: Мышью и клавиатурой Мышью и кнопками на Панели инструментов Кнопками на Панели инструментов и клавиатурой Меню и кнопками...
merimargaryan merimargaryan  23.03.2021 13:34
? Панорама Случайные... Ве В Шашки Фигура Открывание Наглые Растворение Жалюзи Часы Объединен... Случайный Параметры эффектов © Длительность: 00, 50 Применить ко всем Время показа...
sofia20015 sofia20015  23.03.2021 13:38
Определите, какое из указанных имён файлов удовлетворяет маске: ?am*.?? 1) bam.ru 2) zamok.ta 3)tam_tam.ru 4)bam.mp3 Вроде подходят все, кроме 4, но могу ошибаться...
Miki236 Miki236  17.07.2019 14:00
№5. определить сколько раз будет выполняться тело следующих операторов цикла. k: =0; for i: =1 to k+3 do k: =k+1; k: =0; for i: =1 to 9 do k: =k+sqr(i); k: =0; for i: =9 to 1...
polinasenotova polinasenotova  28.04.2020 22:50
РЕШИТЕ ЗАДАЧУ НА ПАСКАЛЕ Задача: Спортсмен пробежал в первый день 10 км., в каждый последующий день на 100 метров больше предыдущего. Через сколько дней он будет пробегать 25...
verbenalaym verbenalaym  28.04.2020 22:50
Запиши программу в Pascal для вычисления площади прямоугольника со сторонами a и m​...
anymay20041302 anymay20041302  28.04.2020 22:35
(программа диалог с компьютером) примерProgram: P1 var Name: string;Age: integer;beginwrite ( Укажите ваше имя : ) ;readin (Name) ;writeln ( Здравствуйте , , Name) ;write ( Укажите...

Популярные вопросы