Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
А
Английский язык
Х
Химия
Э
Экономика
П
Право
И
Информатика
У
Українська мова
Қ
Қазақ тiлi
О
ОБЖ
Н
Немецкий язык
Б
Беларуская мова
У
Українська література
М
Музыка
П
Психология
А
Алгебра
Л
Литература
Б
Биология
М
МХК
О
Окружающий мир
О
Обществознание
И
История
Г
Геометрия
Ф
Французский язык
Ф
Физика
Д
Другие предметы
Р
Русский язык
Г
География
Показать больше
Показать меньше
workout7774
20.03.2022 01:57 •
Информатика
Pascal, цикл для, составить программу. 1)последовательно вводятся 10 целых чисел. найти среднее арифметическое этих чисел
Показать ответ
Ответ:
close44
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 оценок)
Популярные вопросы: Информатика
помогиииитееее2233
06.03.2022 07:58
1.Написать программу, которая описывает как целые переменные и вводит с клавиатуры длины сторон прямоугольника (a и b), рассчитывает и выводит на экран значение периметра. Составить...
LinaPozniak08
23.01.2022 13:23
Помгите с информатикой!...
hollok
08.01.2020 09:31
Напишите программы для построения данных фигур....
yurkamail
29.05.2020 12:43
Напишите линейную программу перевода любого целого четырехзначного двоичного числа в десятичную систему счисления. например, дано число в двоичной системе счисления: 11012. перевод...
ibama
30.03.2022 14:38
Столкнулся с такой проблемой, хотел вставить флешку в материнскую плату, и случайно пальцем задел материнскую плату, после комп вырубился, хотел включить — не включается. без питания...
MaliaCr
06.11.2020 15:07
Сейчас 2019 год на слет юных натуралистов в дк приглашаются девочки в возрасте 10-14 лет известн год рождения ребенка женсмкого пола может ли он участвовать в слете паскаль зависит...
aizhan05
12.02.2023 05:46
Составить кроссворд по теме программирование циклов...
alesia4
12.02.2023 09:00
Вывести на экран таблицу вида x x*x для двузначных чисел, кратных...
nbkmrf
16.10.2021 15:06
Авторы этой вдохновились произведением элсуорта келли “красный жёлтый синий белый и чёрный” () и решили создать собственную абстракцию.их шедевр представляет собой ряд из цветных...
moranikatya
01.02.2023 21:31
Вcodleblocks c++. мкад. фото ниже: в codleblocks c++. сумма цифр. фото ниже: в codleblocks c++. парты. фото ниже: буду сильно !...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и 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.