При ! ! составить программу для введения и суммирования - вопрос №7566875 от nastyamal0101 13.07.2021 03:31

Question

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

nastyamal0101 · Answer

Var sum, number : integer;begin sum := 0; repeat write('Введите число: '); readln(number); sum := sum + number; until (sum > 1000); writeln('Сумма чисел: '+sum);end.
При ! ! составить программу для введения и суммирования чисел, пока сумма не станет больше 1000.

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