Перейти к выбору ответа 12.04.2022Последовательно вводятся числа, найти их сумму. Ввод остановить после ввода значения, которое больше 100 Цикл Until, Pascal Выбрать другой вопрос Смотреть ответ Перейти к выбору ответа Информатика Ответ учителя по предмету Информатика var s, x: integer; begin s := 0; repeat readln(x); if x <= 100 then s := s + x; until x > 100; writeln(s); end.
Похожие вопросы от пользователей