При ! ! составить программу для введения и суммирования - вопрос №7567552 от arseniyrom20p08lxy 28.09.2021 12:04

Question

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

arseniyrom20p08lxy · Answer

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

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