Дана последовательность чисел 5,9,13,17........Сколько слагаемых следует взять чтобы получить сумму равную 3164.Составьте программу для паскаль и блок схему,через систему Writeln do

Дана последовательность чисел 5,9,13,17........Сколько слагаемых следует взять чтобы получить сумму равную 3164.Составьте программу для паскаль и блок схему,через систему Writeln do
Гость
Ответ(ы) на вопрос:
Гость
var x,i:integer; begin x:=5; i:=1; while (x<>3165) do begin x:=x+4; i:=i+1; end; writeln(i); end.
Не нашли ответ?
Ответить на вопрос
Похожие вопросы