При ! ! составить программу для введения и суммирования - вопрос №7567552 от respons 07.01.2021 17:19

Question

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

respons · Answer

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

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