Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
О
ОБЖ
У
Українська мова
Х
Химия
Д
Другие предметы
Н
Немецкий язык
Б
Беларуская мова
М
Музыка
Э
Экономика
Ф
Физика
Б
Биология
О
Окружающий мир
У
Українська література
Р
Русский язык
Ф
Французский язык
П
Психология
О
Обществознание
А
Алгебра
М
МХК
Г
География
И
Информатика
П
Право
А
Английский язык
Г
Геометрия
Қ
Қазақ тiлi
Л
Литература
И
История
Показать больше
Показать меньше
baseke2018
16.10.2022 18:58 •
Информатика
Организовать беспрерывный ввод чисел с клавиатуры, пока пользователь не введёт 0. после ввода нуля, показать на экран количество чисел, которые были введены, их общую сумму и среднее арифметическое. в паскале через repeat
Показать ответ
Ответ:
anastya3
05.10.2020 18:29
Var
a,b,i:integer;
ar:real;
begin
b:=0;
repeat
read(a);
b:=b+a;
i:=i+1;
until a = 0;
ar:=b / i;
writeln('Количество чисел = ', i);
writeln('Общая сумма = ', b);
writeln('Cреднее арифметическое = ',ar);
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
laura35
09.03.2023 05:02
Вставьте пропущенное в определении слово. диаграмма – это еще один вид представления информации . 4 вопрос: для наглядного представления числовых данных используют выберите...
karakozkirikbaox8y6c
20.11.2020 22:09
Посчитайте, сколько битов и байтов информации содержится в вашем имени.Анастасия...
Ага67
27.11.2021 09:16
1. Напишите программу к задаче: Дан массив С (40), заполненный трехзначными случайными числами. Найти произведение четных элементов и сумму нечетных элементов массива....
bossnnn2001
09.03.2021 11:15
Вопрос 1 Текстовый документ - это... Варианты ответов информация, которая представлена на каком-либо носителе в текстовой форме. информация, представленная в виде графических...
mkashkan
29.04.2021 01:49
Представьте десятичное число -131 в двоичном 8-разрядном прямом коде....
Maxxxx123
29.04.2021 01:49
Компьютер, находящийся в состоянии постоянного подключения к сети как называется?...
Исбанка
11.07.2021 05:33
ответить на вопросы Программирование линейных алгоритмов: 1. Как оформляется оператор ввода? 2. Что можно указывать в качестве элементов списка ввода? 3. Как работает...
tata20082
15.01.2021 11:25
по информатике 1 Что означает термин «информатика», какие направления имеет информатика? 2 Какими вопросами занимается информатика как фундаментальная естественная наука...
Mamiksem
27.06.2020 22:22
Информатика Создайте массив из 7 целых элементов и заполните его числом 0) 2) Create an array of 10 integer elements and fill it with the squares of the loop parameter...
malenkayakreyz
03.06.2022 13:57
два потяги виїхали одночасно з однієї станції в різні сторони. Знайти відстань на якій вони будуть через заданий час, якщо відома швидкість кожного потяга(змінні для введення...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
a,b,i:integer;
ar:real;
begin
b:=0;
repeat
read(a);
b:=b+a;
i:=i+1;
until a = 0;
ar:=b / i;
writeln('Количество чисел = ', i);
writeln('Общая сумма = ', b);
writeln('Cреднее арифметическое = ',ar);
end.