Запишите на языке Паскаль программу решения задачи:Дана последовательность чисел 5,9,13,17,... . Определите число слагаемых, сумма которых равна 324

Question

Гость

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

Accepted Answer

var a,b,c:integer; begin c:=5; b:=5; a:=1; repeatc:=c+4; b:=b+c; a:=a+1; until b=324; writeln('Количество слагаемых:',a); end.