Ответы на вопрос:
Var a, b, c, p, sum, avg: real; begin write('введите 3 числа: '); readln(a, b, c); sum : = a + b + c; p : = a * b * c; avg : = sum / 3; writeln('сумма =', sum: 10, #13#10, 'произведение =', p: 10, #13#10, 'ср. арифм. =', avg: 10: 2); end.
Популярно: Информатика
-
BRICKWIH21.10.2020 13:21
-
guardian00988816.04.2023 14:36
-
Боббоянн17.02.2020 23:03
-
nastyakorova66423.03.2021 12:57
-
pavlov020202.03.2023 23:55
-
dbva15.09.2020 07:45
-
BERE133724.07.2021 23:36
-
krubl04.05.2020 00:31
-
максим172204.12.2021 18:18
-
kutluyulovarrr17.05.2021 21:45