Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
А
Английский язык
Х
Химия
Э
Экономика
П
Право
И
Информатика
У
Українська мова
Қ
Қазақ тiлi
О
ОБЖ
Н
Немецкий язык
Б
Беларуская мова
У
Українська література
М
Музыка
П
Психология
А
Алгебра
Л
Литература
Б
Биология
М
МХК
О
Окружающий мир
О
Обществознание
И
История
Г
Геометрия
Ф
Французский язык
Ф
Физика
Д
Другие предметы
Р
Русский язык
Г
География
Показать больше
Показать меньше
Gora583Иришка
22.07.2021 01:10 •
Информатика
Написать программу на я/п паскаль : среднее арифметическое пяти произвольных чисел
Показать ответ
Ответ:
kanamariya021
07.10.2020 11:10
Var a,b,c,d,e,sum:integer;
begin
b:=random(-10000;10000);
a:=random(-10000;10000);
c:=random(-10000;10000);
d:=random(-10000;10000);
e:=random(-10000;10000);
sum:=a+b+c+d+e;
write(sum/5);
end.
0,0
(0 оценок)
Ответ:
nusunusretp0ale8
07.10.2020 11:10
Var a, b, c, d, e: real;
begin
write('Введите 5 чисел через пробел: '); readln(a, b, c, d, e);
writeln('Среднее арифметическое = ', (a+b+c+d+e)/5);
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
glebKoz
31.10.2022 23:58
Найти сумму целых положительных чисел, больших 20, меньших 100 и кратных 3. на языке java script...
katyadrogochinskaya
05.10.2020 14:05
Сколько бит информации используется для кодирования знаков текстовой информации?...
valeri1232
05.10.2020 14:05
При угадывани методом половинного деления целого числа в диапазоне от 1 до n было получено 2 байта информации. чему равно n?...
okorfeda
20.11.2020 02:00
Актуальность темы компьютерные объекты...
GolDash
18.08.2021 21:45
Актуальность темы компьютерные объекты...
nikitakuryan228
23.05.2022 18:35
Частка різниця чисел 549 і 357 та числа 16...
close44
23.05.2022 18:35
Составить сочeнение по языку на тему спорт 8 класс 4 -5 предложений...
maxtihvin
12.03.2023 09:14
Написать 4 фразы о языке в виде прямой речи ....
raushanturlihan
02.10.2021 22:57
Айдай за 3 порции мороженого по 15сомов 50 тыйынов подала продавцу 50 сомов.верны ли утверждения? 1)стоимость покупки 47 сом 50 тыйынов .2)она получит сдачу 3 сома...
duyquhuseynli
05.06.2023 12:55
Отрывок как робинзон крузо осваивает остров...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
begin
b:=random(-10000;10000);
a:=random(-10000;10000);
c:=random(-10000;10000);
d:=random(-10000;10000);
e:=random(-10000;10000);
sum:=a+b+c+d+e;
write(sum/5);
end.
begin
write('Введите 5 чисел через пробел: '); readln(a, b, c, d, e);
writeln('Среднее арифметическое = ', (a+b+c+d+e)/5);
end.