Регистрация
ваноумно
03.05.2023 18:06
Информатика
Есть ответ 👍

Ввести последовательность целых чисел. вычислять сумму чисел в диапазоне от - 3 до 7, пока эта сумма не превышает некоторого числа k. вывести на экран сгенерированные числа, значение суммы, и количество сгенерированных чисел. 3

264
458
Посмотреть ответы 1

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

богдан1703
богдан1703
4,8(3 оценок)
Var a, n, i: integer;   r: longint;   begin   r : = 1;   readln(a, n);   for i : = 1 to n do   r : = r * a;   write(r); end.

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