Войти
Регистрация
Спроси ai-bota
В
Все
Б
Биология
Б
Беларуская мова
У
Українська мова
А
Алгебра
Р
Русский язык
О
ОБЖ
И
История
Ф
Физика
Қ
Қазақ тiлi
О
Окружающий мир
Э
Экономика
Н
Немецкий язык
Х
Химия
П
Право
П
Психология
Д
Другие предметы
Л
Литература
Г
География
Ф
Французский язык
М
Математика
М
Музыка
А
Английский язык
М
МХК
У
Українська література
И
Информатика
О
Обществознание
Г
Геометрия
Показать больше
Показать меньше
саша10103
02.05.2022 04:19 •
Информатика
Pascal, цикл для, составить программу. 1)последовательно вводятся 10 целых чисел. найти среднее арифметическое этих чисел
Показать ответ
Ответ:
ArtimonТёма22887
04.10.2020 23:43
Program up1;
var i,q,w:integer;w:real;
begin
for i:=1 to 10 do
begin
write('введите число');
read(q);
w:=w+q;
end;
e:=w/10;
write('средне арихметическое чисел',e);
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
Murmurmur29
04.02.2023 07:33
Вычислите и определите тип данных результата а)квадрат числа 1,5 б)даны числа 356, 845, 663 найдите максимальное число и укажите тип данных...
lidatutaeva
22.04.2020 18:16
Определите структуры алгоритмов...
Style55
27.03.2022 00:56
Буду ! нужно составить на массив(паскаль): сколько элементов между крайними отрицательными?...
nasty301
27.03.2022 00:56
Проверьте, есть ли среди данных n чисел нули. входные данные вводится число n, а затем n чисел. выходные данные выведите yes, если среди введенных чисел есть хотя бы один...
Abigael
03.09.2021 05:44
Реферат про землетрясение...
Alexander0prokof
08.03.2023 09:37
с практической работой...
kristinasurinaKighkj
20.04.2023 15:48
15. Установіть відповідність між чинниками розміщення виробництва та прикладами виробництва 1 сировинний А) кондитерська 2 водний Б) целюлозно - паперова 3 науковий В)...
ХудшийИзХудших
20.04.2023 15:48
Букет состоит из а веток хризантем и в веток гвоздики. Сколько стоит букет, если 1 цветок гвоздики стоит х рублей и он дешевле ветки хризантемы на 5 рублей? 1. ах+в(х+5);...
antonil70
19.11.2020 10:22
Анализ одного стихотворения Михаила Михайловича Люгарина. объëм: 1 - 1,5 страницы, подробно....
lizagileva2015
20.12.2021 00:41
Графики движения тел представлены на рисунке. Напишите уравнения движения и определите место и время их встречи....
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
var i,q,w:integer;w:real;
begin
for i:=1 to 10 do
begin
write('введите число');
read(q);
w:=w+q;
end;
e:=w/10;
write('средне арихметическое чисел',e);
end.