Вопрос по информатике:
Срочно ! Очень прошу помочь!
Информатика , нужна программа и блок-схема , можно просто программу !(Паскаль)
1)Найдите произведение всех 3-х значных чисел , оканчивающихся на 5.
2)Найдите сумму всех 2-х значных чисел , оканчивающихся на 5 .
Буду очень благодарна!
- 22.02.2018 22:33
- Информатика
- remove_red_eye 16888
- thumb_up 41
Ответы и объяснения 1
1)var numb,pro:integer;
begin
pro:=1;
for numb := 100 to 999 do
if (numb mod 10 = 5) then
pro:= pro*numb;
writeln(pro);
end.
2)var numb,summ:integer;
begin
for numb := 10 to 99 do
if (numb mod 10 = 5) then
summ:= summ+numb;
writeln(summ);
end.
- 23.02.2018 21:47
- thumb_up 45
Знаете ответ? Поделитесь им!
Есть сомнения?
Не нашли подходящего ответа на вопрос или ответ отсутствует? Воспользуйтесь поиском по сайту, чтобы найти все ответы на похожие вопросы в разделе Информатика.
Трудности с домашними заданиями? Не стесняйтесь попросить о помощи - смело задавайте вопросы!
Информатика — наука о методах и процессах сбора, хранения, обработки, передачи, анализа и оценки информации с применением компьютерных технологий, обеспечивающих возможность её использования для принятия решений.