Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
А
Английский язык
Х
Химия
Э
Экономика
П
Право
И
Информатика
У
Українська мова
Қ
Қазақ тiлi
О
ОБЖ
Н
Немецкий язык
Б
Беларуская мова
У
Українська література
М
Музыка
П
Психология
А
Алгебра
Л
Литература
Б
Биология
М
МХК
О
Окружающий мир
О
Обществознание
И
История
Г
Геометрия
Ф
Французский язык
Ф
Физика
Д
Другие предметы
Р
Русский язык
Г
География
Показать больше
Показать меньше
glushcovapolia
17.08.2022 10:49 •
Информатика
Вводится 3 числа вычислить среднее апифметическое этих чисел составить формализацию, алгоритм программы и программу
Показать ответ
Ответ:
Максим2311111
01.10.2020 13:15
Program srednee;
Var a,b,c:Integer;
Begin
Write('Введите 3 числа');
read(a,b,c);
WriteLn('Их среднее арифметическое ',a,' ',b,' ',c,' = ',a+b+c/3:2:2);
ReadLn;
End.
Алгоритм:
1. Ввести 3 числа
2. Найти сумму 3 чисел
3. Поделить/Разделить на количество чисел т.е. на 3
4. Результат
0,0
(0 оценок)
Популярные вопросы: Информатика
xAlonerx
24.09.2020 20:28
Задача из ЕГЭ по информатике. Язык для кода: Питон....
Полина1111164844858
21.02.2023 13:35
Алгоритм вычисления значения функции P(n), где n — натуральное число, задан следующими соотношениями: P(1)=1,P(n)=P(n−1)⋅n,приn 1. Чему равно значение функции P(8)?...
123456445
28.05.2021 11:51
Исполнитель Робот передвигается на клеточной доске, выполняя команды 1) шаг вверх 2) шаг вниз 3) шаг вправо 4) шаг влево. Робот успешно выполнил команду: а)2331322 б)1333312...
Девочка1124
22.06.2021 18:12
Преобразовать для языка Паскаль...
Desp3r101
13.08.2021 04:26
В таблице Dat хранятся данные измерений среднесуточной температуры за 10 дней в градусах (Dat[1] — данные за первый день, Dat[2] — за второй и т. д.). Определите, какое...
glupostsroghdeniy
17.02.2023 20:35
Ребят предупреждаю, очень сложно, если вы не программировали что-то Урок 11: введение в стилиПочти то же самое сделаем и для заголовка второго уровня. Задайте ему размер...
polsedegova
20.12.2021 17:57
Найдите инструменты ОЧЕНЬ НАДО...
00lom00
19.11.2020 12:35
Переведите 45 Мбайт в биты. Выберите один ответ: a. 45000000 b. 360000000 c. 377487360...
BvbNo9
10.04.2023 21:33
Чему равно количество значащих нулей в двоичной записи числа 257 10...
OlyaKasyanenko28
15.07.2020 06:54
ответь Перечислите инструменты 3д редактора...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
Var a,b,c:Integer;
Begin
Write('Введите 3 числа');
read(a,b,c);
WriteLn('Их среднее арифметическое ',a,' ',b,' ',c,' = ',a+b+c/3:2:2);
ReadLn;
End.
Алгоритм:
1. Ввести 3 числа
2. Найти сумму 3 чисел
3. Поделить/Разделить на количество чисел т.е. на 3
4. Результат