Регистрация
darytish
18.10.2022 07:27
Информатика
Есть ответ 👍

При ! ! составить программу для введения и суммирования чисел, пока сумма не станет больше 1000.

177
236
Посмотреть ответы 2

Ответы на вопрос:

NastjaKucera13
NastjaKucera13
4,4(35 оценок)
Var sum, number : integer; begin  sum : = 0;       repeat    write('введите число: ');     readln(number);     sum : = sum + number;   until (sum > 1000);       writeln('сумма чисел: '+sum); end.
ДЕСПАСИТТО58
ДЕСПАСИТТО58
4,5(12 оценок)
По моему это аудиорекордер

Популярно: Информатика