tutotveti.ru
Предметы
Биология
Українська мова
Музыка
Французский язык
Физика
МХК
Обществознание
Психология
ОБЖ
Право
Беларуская мова
Литература
Химия
Українська література
Экономика
Немецкий язык
География
Информатика
Қазақ тiлi
Геометрия
Английский язык
Русский язык
Окружающий мир
Алгебра
История
Другие предметы
Видео-ответы
ПОИСК
Войти
Регистрация
Информатика
Написать программу, вычисляющую
Написать программу, вычисляющую среднее арифметическое n чисел, введенных с клавиатуры. цикл for; pascal.
Vikamurzikk
2 19.09.2019 15:40
2
Ответы
AnnA18101
08.10.2020 02:30
Const n = 10;
var b: Integer;
var a: array[1..n] of integer;
begin
for var i := 1 to n do
begin
Read(a[i]);
b+=a[i];
end;
Writeln(b/n);
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
AlexanderVard
09.04.2020 10:18
Как можно определить и исправить ошибки, допущенные во время программирования в...
oksanasmolko20
07.12.2020 18:54
Решите задачу, 2. В классе ребята обсуждали какую собаку подарят родители их приятелю. Первый сказал, что это будет хаски чёрного цвета, Наверное, белого пуделя, - предположит второй....
KopiYT
07.12.2020 18:54
Помгите(( СОР! устонови соотвествие...
DekenS1
07.12.2020 18:53
ТЕКСТ ЗАДАНИЯ Дан фрагмент электронной таблицы. A В 1 Переменная Значение 2 А 3 3 В =СУММ(В2;4) 4 С =ПРОИЗВЕДВ2:B3) Определи результат ячейки В4. Введи его в поле ввода....
roma6279
07.12.2020 18:53
Запишите формат ячейки 15% ...
23LOLKEK
07.12.2020 18:53
Вопрос Объем внешнего носителя информации 4 Гигабайта. Файл имеет размер 2 кбайт. Сколько таких файлов может уместиться на этом носителе информации? Выберите верноерешение,(4*1024*1024)/2...
adrianaartus8
25.02.2020 17:53
Обьясните правило расположения операторов после THEN и ELSE в случаях, когда количество используемых операторов больше одного ...
valera122004
25.02.2020 17:53
Напишите программы на языке c++ которая решает следующий примеры:1-ая программа:х=q+v*t2-ая программа:S=v*t+a*1²/23-ая программа:С=n*(n-1)/2...
Masha6996
21.05.2019 14:50
Впрямоугольной трапеции основания равны 17 см и 5 см, а большая боковая сторона 13см, найти площадь трапеции. за решение, :...
svetlanasevasty
21.05.2019 14:40
Какой утверждение о градусной сетке является верным? а) северный и южный полюса имеют координаты 90 северной или южной долготы. б) экватор на карте - самая короткая параллель. в)...
Популярные вопросы
Визначте прискорення руху точки масою 1,5 кг в момент часу 3 c, якщо рівняння...
2
Как писать вместе или разделно (Не) умеющий читать и писать человек; (не)содержащий...
3
Чтобы решить проблему мирового голода, необходимо уже сейчас обратить внимание...
1
В чом вымирюеться пытома теплопровиднисть...
2
Какого Ваше отношение к предводителю народного восстания Е.Пугачеву? (Капитанская...
1
1)Y=sin(x+p/4)-3 2)y=-sin(x-p/3)+2 нарисуйте график...
2
Визначте взаємне розміщення бічного ребра і діагоналі однієї з граней куба А.мимобіжніБ.мимобіжні...
3
Поставьте события в хронологическом порядке.1. Пожар в Москве 2. Указ о заповедных...
1
Напишіть зв’язну розповідь за інфографією «Шекспір» зі сторінкі 74 підручника...
2
Обчисли відносну молекулярну масу складної речовини формула якої Cu SO 3 ...
1
var b: Integer;
var a: array[1..n] of integer;
begin
for var i := 1 to n do
begin
Read(a[i]);
b+=a[i];
end;
Writeln(b/n);
end.