Предмет: Информатика,
автор: мудрейшая2401
Ввести с клавиатуры три целых числа, найти их сумму, произведение и среднее арифметическое в pascal ABC
Пример:
Введите три целых числа :
5 7 8
5+7+8=20
5*7*8=280
(5+7+8)/3=6,667
Ответы
Автор ответа:
0
Vara:real;b:real;c:real;d1:real;d2:real;d3:real;
Beginwriteln ('Введите числа');readln (a);readln (b);readln (c);d1:= a+b+c;d2:= a*b*c;d3:= (a+b+c)/3;writeln ('Сумма =',d1,',произведение =',d2,', а среднее арифметическое =',d3,'')end.
Beginwriteln ('Введите числа');readln (a);readln (b);readln (c);d1:= a+b+c;d2:= a*b*c;d3:= (a+b+c)/3;writeln ('Сумма =',d1,',произведение =',d2,', а среднее арифметическое =',d3,'')end.
Интересные вопросы
Предмет: Алгебра,
автор: louiselee1407
Предмет: Математика,
автор: elisokvarachelia5
Предмет: Геометрия,
автор: kolyaonisko
Предмет: Математика,
автор: gleb060803boldy123