Войти
Регистрация
Спроси ai-bota
В
Все
У
Українська література
Г
Геометрия
Д
Другие предметы
Э
Экономика
Г
География
О
ОБЖ
М
Математика
М
МХК
Х
Химия
Қ
Қазақ тiлi
Л
Литература
У
Українська мова
О
Обществознание
Ф
Физика
А
Английский язык
А
Алгебра
И
История
Б
Беларуская мова
Б
Биология
М
Музыка
П
Право
И
Информатика
П
Психология
В
Видео-ответы
Н
Немецкий язык
Ф
Французский язык
О
Окружающий мир
Р
Русский язык
Показать больше
Показать меньше
Vika4634
22.07.2022 19:16 •
Информатика
Склавиатуры вводится последовательность вещественных чисел. признак конца ввода – 0. определить полусумму всех чисел в интервале от 0 до 5.
программа в среде pascal
Ответ:
Света0475
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 оценок)
Популярные вопросы: Информатика
Lerka2004love
26.01.2022 15:12
Электронные таблицы Задача на знание...
kery99
04.02.2022 23:06
Расширение файла записанного с ошибками операционной системы MS-DOS имеет тип: 1) *. SYS 2) *. TMP 3) *.$$$ 4) *. TXT...
Anilop11
23.08.2020 15:36
Сколько времени потребуется для ввода в память компьютера текста на 84 страницах с сканера и программы ABBYY FineReader, если известно, что на сканирование одной страницы...
iodin
31.12.2021 23:22
Dim d,n, i as integer n=4 d=n*2 for i = 1 to 3 d= d+ 2*i next i print d записать значение переменной d....
denis2013den
01.11.2021 06:09
Или на вопросы отвечаете: 1.как ты понимаешь термин файл ?2.Из каких частей систоит полное имя файла? 3.Какие действия можно выполнить с файлами?!Можно ответ полностью...
567н
16.08.2021 11:32
Найти наибольшие элементы каждой строки матрицы Z(16,16) и поместить их на главную диагональ. Вывести полученную матрицу в dataGridView. приложение visual studio...
Sopfia3333333333333
11.06.2020 19:39
Написать программу нахождения суммы цифр вводимого с клавиатуры натурального трехзначного числа. 2. Написать программу, определяющую истинность высказывания «Треугольник...
Милаха7884433
21.03.2022 21:15
По биологии задали какое-то странное . нужно написать оболочки, характеристики и функции к ним. в классе написали цпм что писать ещё?...
dimakalabin
21.03.2022 21:15
На какой вопрос отвечает дождик тучки качки...
viper998
21.03.2022 21:15
Сравните числа, в которых отдельные цифры заменены звездочками: а) 55 *** и 56 ***; д) *** и б) **3 2** и 9748; е) 93* и 15 *** в) 95 *** и *4 ***; ж) *4 *** и 96 ***...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
PascalABC.NET
begin
Println(ReadSeqRealWhile(p -> p <> 0).
Where(p -> p.InRange(0, 5)).Sum / 2)
end.