Вопрос по информатике:
Для пяти произвольных чисел, введенных с клавиатуры, выведите на экран соответствующие результаты. Если первое, второе и пятое числа отрицательны, то выведите их произведение. Если третье и четвёртое числа больше100, то выведите среднее арифметическое всех пяти чисел. Если выполняются одновременно два перечисленных выше условия, то выведите на экран все пять чисел без изменения. Иначе, выведите третье и пятое числа, увеличив их в два раза.
- 25.10.2017 13:33
- Информатика
- remove_red_eye 16075
- thumb_up 66
Ответы и объяснения 1
var a1,a2,a3,a4,a5:real;
u1,u2:boolean;
begin
writeln('Введите 5 вещественных чисел');
readln(a1,a2,a3,a4,a5);
u1:=(a1<0) and (a2<0) and (a5<0);
u2:=(a3>100) and (a4>100);
if u1 and u2 then writeln(a1,' ',a2,' ',a3,' ',a4,' ',a5)
else
if u1 then writeln('a1*a2*a5=',a1*a2*a5)
else
if u2 then writeln('sr.arifm=',(a1+a2+a3+a4+a5)/5)
else writeln(2*a3,' ',2*a5);
end.
- 26.10.2017 06:14
- thumb_up 12
Знаете ответ? Поделитесь им!
Есть сомнения?
Не нашли подходящего ответа на вопрос или ответ отсутствует? Воспользуйтесь поиском по сайту, чтобы найти все ответы на похожие вопросы в разделе Информатика.
Трудности с домашними заданиями? Не стесняйтесь попросить о помощи - смело задавайте вопросы!
Информатика — наука о методах и процессах сбора, хранения, обработки, передачи, анализа и оценки информации с применением компьютерных технологий, обеспечивающих возможность её использования для принятия решений.