Вопрос по информатике:
1. используя цикл for вывести на экран чётные числа от 1 до 40
2. найдите произведение нечётных чисел от 1 до n
Трудности с пониманием предмета? Готовишься к экзаменам, ОГЭ или ЕГЭ?
Воспользуйся формой подбора репетитора и занимайся онлайн. Пробный урок - бесплатно!
- 25.01.2017 23:45
- Информатика
- remove_red_eye 530
- thumb_up 32
Ответы и объяснения 1
1.
var i:integer;
begin
for i:=1 to 40 do
if not odd(i) then write(i:3);
end.
2.
var i,n,p:integer;
begin
write('Введите n: '); readln(n);
p:=1;
for i:=1 to n do
if odd(i) then p:=p*i;
write(p);
end.
- 26.01.2017 00:38
- thumb_up 5
Знаете ответ? Поделитесь им!
Есть сомнения?
Не нашли подходящего ответа на вопрос или ответ отсутствует? Воспользуйтесь поиском по сайту, чтобы найти все ответы на похожие вопросы в разделе Информатика.
Трудности с домашними заданиями? Не стесняйтесь попросить о помощи - смело задавайте вопросы!
Информатика — наука о методах и процессах сбора, хранения, обработки, передачи, анализа и оценки информации с применением компьютерных технологий, обеспечивающих возможность её использования для принятия решений.