logo
Войти Регистрация Спроси ai-bota
В
Все
Б
Биология
Б
Беларуская мова
У
Українська мова
А
Алгебра
Р
Русский язык
О
ОБЖ
И
История
Ф
Физика
Қ
Қазақ тiлi
О
Окружающий мир
Э
Экономика
Н
Немецкий язык
Х
Химия
П
Право
П
Психология
Д
Другие предметы
Л
Литература
Г
География
Ф
Французский язык
М
Математика
М
Музыка
А
Английский язык
М
МХК
У
Українська література
И
Информатика
О
Обществознание
Г
Геометрия
Vrronika778
Vrronika778
07.10.2020 16:26 •  Информатика

Склавиатуры вводится последовательность вещественных чисел. признак конца ввода – 0. определить полусумму всех чисел в интервале от 0 до 5.

программа в среде pascal

Показать ответ
Ответ:
Seks7383
Seks7383
05.05.2020 17:55

PascalABC.NET

begin

 Println(ReadSeqRealWhile(p -> p <> 0).

     Where(p -> p.InRange(0, 5)).Sum / 2)

end.

0,0(0 оценок)
Популярные вопросы: Информатика
Альона13345
Альона13345
20.03.2021 23:15
Воспользовавшись моделью, построенной в примере 1, определите, за сколько часов бассейн может быть наполнен через первую трубу, если через вторую он заполняется за...
angelikasolnce
angelikasolnce
19.09.2021 19:12
Собери разные буквы из этих элементов : палочка вертикальная, горизонтальная и большая анлийская д...
saparhanaruzhan
saparhanaruzhan
10.03.2020 22:29
по каким параметрам определяется эффективность работы компьютерной сети​...
шгилтдтдьжжь
шгилтдтдьжжь
25.07.2021 00:11
Определите маску подсети, соответствующую указанному диапазону IP-адресов. b) Диапазон адресов от 61.8.0.1 до 61.15.255.254. c) Диапазон адресов от 172.88.32.1 до...
dina9992
dina9992
12.06.2022 17:52
Как нарисовать дату 04/06/06 в чертёжнике(кумире)​...
БЕРЕНА
БЕРЕНА
05.10.2021 19:02
1.создать массив a из 10 целых чисел, принадлежащих промежутку [-50; 50]. вывести полученный массив на экран, подсчитать сумму положительных элементов и количество...
radmirsatabalov
radmirsatabalov
04.11.2020 14:37
Скласти програму для обчислення всiх двоцифрових чисел...
polinfasdfg
polinfasdfg
18.06.2022 12:11
Дано решение и рисунок катеты прямоугольного abc (...
sp14
sp14
18.06.2022 12:11
Формулы сокращённого умножения: a^4-b^8= 27b^3+a^6=...
arinaari11
arinaari11
18.06.2022 12:11
Вставьте в устойчивые обороты (фразеологизмы) на месте пропропусков нужны имена числительные и запишите получившиеся выражения. объясните значение фразеологизмов....
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
О НАС
СООБЩЕСТВО
ПОМОЩЬ
App
.
.
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота