Информатика, опубликовано 2018-08-22 23:38:17 by Гость

Опять паскаль... Задана арифметическая прогрессия 2; 2,8; … . Сколько членов прогрессии нужно сложить, чтобы полученная сумма стала >20.

Ответ оставил Гость

A := 2.0;
i := 1;
while (a begin
a := a + a + 0.8;
inc(i);
end;
writeln(i);


Не нашли ответа?
Если вы не нашли ответа на свой вопрос, или сомневаетесь в его правильности, то можете воспользоваться формой ниже и уточнить решение. Или воспользуйтесь формой поиска и найдите похожие ответы по предмету Информатика.

Форма вопроса доступна на полной версии этой страницы.