Вопрос по информатике:
1.дано действительное число x и целое число n вывести N первых челнов арифметическойкой прогрессии и найти сумму ее первых членов если первый член X а разность 1,12
2.дано действительное число x и целое число n вывести N первых членов арифметическойкой прогрессии и найти сумму ее первых членов если первый член X а разность (-2,2)
- 11.10.2017 09:00
- Информатика
- remove_red_eye 13336
- thumb_up 17
Ответы и объяснения 1
Универсальное решение
var
a, d, s: real;
i, n: integer;
begin
writeln('Введите х, разность и n');
readln(a, d, n);
s := a;
for i := 2 to n do
begin
a := a + d;
s := s + a;
end;
writeln(s);
end.
- 12.10.2017 20:32
- thumb_up 15
Знаете ответ? Поделитесь им!
Есть сомнения?
Не нашли подходящего ответа на вопрос или ответ отсутствует? Воспользуйтесь поиском по сайту, чтобы найти все ответы на похожие вопросы в разделе Информатика.
Трудности с домашними заданиями? Не стесняйтесь попросить о помощи - смело задавайте вопросы!
Информатика — наука о методах и процессах сбора, хранения, обработки, передачи, анализа и оценки информации с применением компьютерных технологий, обеспечивающих возможность её использования для принятия решений.