Войти
Регистрация
Спроси ai-bota
В
Все
Х
Химия
В
Видео-ответы
А
Алгебра
Г
Геометрия
О
ОБЖ
Д
Другие предметы
У
Українська література
Р
Русский язык
Б
Беларуская мова
У
Українська мова
Э
Экономика
Ф
Физика
М
Математика
Ф
Французский язык
Г
География
И
Информатика
М
МХК
О
Окружающий мир
П
Психология
Н
Немецкий язык
О
Обществознание
П
Право
И
История
М
Музыка
Л
Литература
Қ
Қазақ тiлi
Б
Биология
А
Английский язык
Показать больше
Показать меньше
School30zh
14.09.2021 19:12 •
Информатика
1. ввести три числа, найти их сумму, произведение и среднее арифмитическое: пример: ввести 3 числа. 4 5 7 4+5+7=16 4*5*7=140 (4+5+7): 3=5,3(3)
Ответ:
Kirikplay11
27.05.2020 13:52
Var
a, b, c: integer;
begin
readln(a, b, c);
Writeln('Сумма= ', a + b + c);
Writeln('Произведение= ', a * b * c);
Writeln('Среднее= ', (a + b + c) / 3);
readln();
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
Печенькавасилиса
11.05.2023 18:46
Что делать если на телефоне ты зашла во второе пространство там надо было вести пароль а ты пропустить нажала и не можешь вернуться ? а то мама убьёт ...
fcone
21.02.2021 02:39
Ккаким языкам относятся языки программирования...
Ilya333444
24.04.2021 02:39
Дан массив ненулевых целых чивел размера n. проверить, образуют ли его элементы прогресию.если образуют , то вывести знаменатель прогресии, если нет- вывести 0....
epikhinanatuly
24.04.2021 02:39
Для хранения изображения 800*200 точек выделено 80 кбайт памяти. определите, какое максимальное число цветов допустимо использовать в этом случае. )...
madisha12
24.04.2021 02:39
Чем отличается коммуникационная система от информационной?...
pavelmishulski
30.09.2021 03:12
Как автоматически построить оглавление документа? что такое гипертекст,гиперссылка?...
davidbezhasny0
30.09.2021 03:12
Дано целое число n ( 0). найти наименьшее целое положительное число k, квадрат которого превосходит n: k^2 n. функцию извлечения квадратного корня не использовать...
7547854
24.11.2022 08:20
Сколько символов можно разместить в 30 байтах памяти, при условии что задан алфавит мощностью 256...
Ник1233211
26.01.2020 21:28
В каких локальных сетях применяется топология звезда? ...
timon201
14.12.2022 23:17
Определите Что будет напечатано в результате работы следующей программы. vars,k: integer. begin s:200 for k:=6 to9 do s:=s-5×k writeln(s) end...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
a, b, c: integer;
begin
readln(a, b, c);
Writeln('Сумма= ', a + b + c);
Writeln('Произведение= ', a * b * c);
Writeln('Среднее= ', (a + b + c) / 3);
readln();
end.