tutotveti.ru
Предметы
Биология
Українська мова
Музыка
Французский язык
Физика
МХК
Обществознание
Психология
ОБЖ
Право
Беларуская мова
Литература
Химия
Українська література
Экономика
Немецкий язык
География
Информатика
Қазақ тiлi
Геометрия
Английский язык
Русский язык
Окружающий мир
Алгебра
История
Другие предметы
Видео-ответы
ПОИСК
Войти
Регистрация
Информатика
Мне нужна программа которая
Мне нужна программа которая находит среднее арифметическое чисел вводимых в консоль.
DXDynamic31
2 18.09.2019 02:30
0
Ответы
Semensem
10.09.2020 11:07
//PascalABC.NET
//Версия 3.3, сборка 1627
begin
write(ReadSeqInteger(ReadInteger).Average);
end.
ПОКАЗАТЬ ОТВЕТЫ
sofirzhk
10.09.2020 11:07
Var
n, t: integer;
a, s: real
begin
readln(n);
for t := 1 to n do
begin
readln(a);
s := s + a;
end;
writeln(s / n);
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
BlackWolf05
29.10.2020 10:07
3 любых вида операционных систем на ПК...
Alina4315
29.10.2020 10:08
Объясните назначение частной виртуальной сети VPN и назовите три вида соединений, которые может обеспечивать VPN Назначение: Виды:...
alinadogarowa
16.09.2019 02:50
6. какие источники информации использовали следующие персонажи сказок а.с.пушкин 1) царевич елисей, искавший свою невесту? 2) злая мачеха , задумавшая извести свою падчерицу и доверявшая...
pinelike
16.09.2019 02:50
Укажите что из перечисленного не является случайной угрозой безопасности информации? а) ошибки пользователя б) компьютерные вирусы в) отказ и сбои аппаратуры г) форс-мажорные обстоятельства...
daimon708
16.09.2019 02:40
Рассчитайте объем видеопамяти. разрешение 4096x3072 и 16777216 цветов. ответ в мб...
leraleva
18.10.2020 07:40
Архивтеу программалар 3 ответь...
KamAbi003
24.11.2019 12:02
Доклад по музыке на тему: духовная музыка...
66vdv1
24.11.2019 12:02
с информатикой. 35 ! ; ! составьте таблицу истинности для выражений : 1) а \/ а— (чёрточка , это отрицание)2) а /\ в = в /\ а3) а /\ (в /\ с) = (а /\ в) \/ ( а /\ с...
aodemidov
24.11.2019 12:02
Схожість відмінність зевса і прометей...
Нюша1390
24.11.2019 12:01
Міні-твір переваги та недоліки вищої освіти за кордоном ....
Популярные вопросы
Объясните как делать, не понимаю: ( сторона ab треугольника abc равна 3. противолежащий...
2
Влыжной эстоете участвовали 9 команд мальчиков по 8 в каждой и ещё 24 девочки...
2
30 ! 4x*(x-1)- числитель (4-x²)*(x²-x) - знаменатель желательно по действиям если...
1
Темнохвойные елово-пихтовые леса кедровники...
2
Задали написать сочинение на тему герои космоса пазязя...
1
Какие полезные ископаемые необходимы для изготовления бетона...
3
Решите занятия в музыкальной школе начались в 14 часв 20 минут.в какое время закончились...
3
Какова площадь поперечного сечения константановой проволоки длиной 20 метров и...
1
Do you know any rhumes from your country? draw a picture of one...
1
Напишите самого ядовитого животного в украине, зарание и !...
1
//Версия 3.3, сборка 1627
begin
write(ReadSeqInteger(ReadInteger).Average);
end.
n, t: integer;
a, s: real
begin
readln(n);
for t := 1 to n do
begin
readln(a);
s := s + a;
end;
writeln(s / n);
end.