Вопрос по информатике:
Дана арифметическая прогрессия из N членов.Число элементов N,1-й элемент а1 и разность d задаются с клавитуры.Вывести все члены прогрессии на экран и вычислить сумму элементов прогрессии,значение которых меньше пяти.Решить задачу тремя способами.прошу помогите я буду очень благодарен.
Трудности с пониманием предмета? Готовишься к экзаменам, ОГЭ или ЕГЭ?
Воспользуйся формой подбора репетитора и занимайся онлайн. Пробный урок - бесплатно!
- 14.03.2015 07:47
- Информатика
- remove_red_eye 11182
- thumb_up 18
Ответы и объяснения 1
a: array [1..255] of integer;
i, n, d, a1: integer;
begin
writeln('n, d, a1');
read(n, d, a1);
a[1]:=a1;
for i:=2 to n do a[i]:=a[i-1]+d;
a1:=0;
for i:= 1 to n do if a[i]<5 then a1:=a1+a[i];
writeln('summa:', a1);
for i:=1 to n do write(a[i], ' ')
end.
- 15.03.2015 06:59
- thumb_up 25
Знаете ответ? Поделитесь им!
Есть сомнения?
Не нашли подходящего ответа на вопрос или ответ отсутствует? Воспользуйтесь поиском по сайту, чтобы найти все ответы на похожие вопросы в разделе Информатика.
Трудности с домашними заданиями? Не стесняйтесь попросить о помощи - смело задавайте вопросы!
Информатика — наука о методах и процессах сбора, хранения, обработки, передачи, анализа и оценки информации с применением компьютерных технологий, обеспечивающих возможность её использования для принятия решений.