Ответы на вопрос:
Var a,b,c,s: real; begin writeln ('введите a, b, c: '); readln (a,b,c); s: =(a+b+c)/3; writeln ('их среднее: ',s); end.
Популярно: Информатика
-
1.Определите потребности пользователя, который могут быть реализованы...
вєлтикнадрей16.08.2021 19:21 -
Какое из данных выражений имеет смысл при любых значениях n? 20n+9...
renatadautova14.03.2020 07:27 -
Поиск в Goos D eams - 3 Online Mektep - Bili... Компьютерные сети...
chikist205.10.2022 22:13 -
программа на языке паскаль, которая выводит на экран 10 случайных...
holodovika25.10.2022 05:17 -
с информатикой! _ . _ A&((B&C)(A&B) Надо из выражения...
enderrock8428.06.2022 03:09 -
Как в паскале делать вычитания и умножения?...
кекай26.09.2022 14:29 -
Выберите программы-архиваторы: Microsoft Word Windows Microsoft...
Aryzhaн13.07.2022 04:51 -
Найдите сумму первых 10 натуральных чисел кратных...
Katуа0708.06.2023 03:18 -
Сор информатика 8 класс в приложении....
закро13.08.2022 23:31 -
Втрёхзначном числе не меньше двух цыфр, которые меньше 6, и не...
7Оля808.04.2021 14:07