Question

Срочно завтро самостоятльная помогите пожалуста заранее спасибо составить программу вычисления значения суммы чисел: 14;15;16;17;.... пока сумма не достигнет числа k

Answer 1

Var
a,k:integer;
begin
read(k);
a:=14;
while a<=k begin
k:=k+a;
a:=a+1;
end;
writeln(Сумма: ,k);
end.

Answer 2

Да, конечно, я помогу вам составить программу для вычисления суммы чисел до тех пор, пока сумма не достигнет заданного числа k. Для этого вы можете воспользоваться циклом, например, циклом while. Ниже приведен пример кода на языке программирования Python:

# Заданное число k
k = 100  # Замените на нужное вам значение

# Начальные значения
сумма = 0
текущее_число = 14

# Цикл, пока сумма меньше k
while сумма < k:
    сумма += текущее_число
    текущее_число += 1

# Вывод результата
print("Сумма чисел:", сумма)
print("Последнее добавленное число:", текущее_число - 1)

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

Не забудьте изменить значение переменной k на нужное вам число. Если у вас возникнут дополнительные вопросы или требуется помощь в адаптации кода под другой язык программирования, пожалуйста, дайте мне знать!