Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
А
Английский язык
Х
Химия
Э
Экономика
П
Право
И
Информатика
У
Українська мова
Қ
Қазақ тiлi
О
ОБЖ
Н
Немецкий язык
Б
Беларуская мова
У
Українська література
М
Музыка
П
Психология
А
Алгебра
Л
Литература
Б
Биология
М
МХК
О
Окружающий мир
О
Обществознание
И
История
Г
Геометрия
Ф
Французский язык
Ф
Физика
Д
Другие предметы
Р
Русский язык
Г
География
Показать больше
Показать меньше
умница603
21.09.2021 20:43 •
Информатика
Составьте программу на языке паскаль по нахождению среднего арифметического 3 чисел!
Показать ответ
Ответ:
Оксана1241
21.09.2020 20:01
Program nevazhno;
var a,b,c:integer;
d:real;
begin
writeln('введите первое число');
readln(a);
writeln('введите второе число');
readln(b);
writeln('введите третье число');
readln(c);
d:=(a+b+c)/3;
writeln('среднее арифметическое=',d);
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
ВасилийПупкин227
22.06.2020 02:12
9. Для чего используются логические операторы для решения статических задач; для выполнения арифметических вычислений. для создания логических выражений для построения графиков...
olgavoronina19
21.11.2022 22:48
1. Приведите несколько построения строки А. Семёнов из строки s:= Семёнов Андрей 1) s1:= 2) s1:= 3) s1:= 2. Как можно найти вторую букву «с» с начала строки? Напишите программу,...
rsharapov
07.03.2022 09:59
Выпиши в один столбик правильные имена файлов, а во второй правильные имена каталогов: письмо.18, letter.txt, winword, письмо.doc, школа? 234, мои документы, роза.bmp, crop12.exe,...
semyonshhuko9
16.06.2022 17:41
Песня о соколе. что понимает под безумством и правдой уж и что значит безумство храбрых , провозглашаемое в ? что означает дело жизни для ужа и что для сокола?...
aboboskayaovrain
16.06.2022 17:41
Task 6. answer the questions on the olympic games. for each correct answer you get 1 point. 1. how long is the marathon distance? 2. what olympics saw the olympic flag for...
TrinanenkoJulia
16.06.2022 17:41
Назовите два гигантских грных пояса в евразии. какие горы в них входят? назовите 5 самых высоких вулканов в евразии...
Дарина37373
16.06.2022 17:41
5х\ х минус 5 + 25\5-х, сумму надо...
Ros15011
16.06.2022 17:41
Запишите предложения , раскрывая скобки. укажите приложения и условия их обособления. 1)берегите наш язык (наш прекрасный язык). 2)чем ближе подлетал к местам строек ( к...
mellll12345
16.06.2022 17:41
1. в коробке оказалось 12 бракованных лампочек, что составило 4% числа всех лампочек.сколько целых лампочек было в коробке? 2.потратили 805 имевшихся денег , и осталось...
вита4321
16.06.2022 17:41
Определите какая сумма вложенных в сбербанк средств ежегодно приносит доход: а) в 24р. б) в 30 р. в) в 1260 р. если известно, что этот банк платит 3% годовых....
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
var a,b,c:integer;
d:real;
begin
writeln('введите первое число');
readln(a);
writeln('введите второе число');
readln(b);
writeln('введите третье число');
readln(c);
d:=(a+b+c)/3;
writeln('среднее арифметическое=',d);
end.