Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
А
Английский язык
Х
Химия
Э
Экономика
П
Право
И
Информатика
У
Українська мова
Қ
Қазақ тiлi
О
ОБЖ
Н
Немецкий язык
Б
Беларуская мова
У
Українська література
М
Музыка
П
Психология
А
Алгебра
Л
Литература
Б
Биология
М
МХК
О
Окружающий мир
О
Обществознание
И
История
Г
Геометрия
Ф
Французский язык
Ф
Физика
Д
Другие предметы
Р
Русский язык
Г
География
Показать больше
Показать меньше
tugatimu9876
30.05.2023 04:55 •
Информатика
Найдите сумму значений 10 элементов массива,больших 50,но меньше 60
Показать ответ
Ответ:
Diana17273839
07.10.2020 14:45
// PascalABC.NET 3.3, сборка 1599 от 17.12.2017
// Внимание! Если программа не работает, обновите версию!
begin
var a:=ArrRandom(ReadInteger('n='),10,99); a.Println;
Writeln('S=',a.Where(t->t.Between(51,59)).Sum)
end.
Пример
n= 17
55 34 53 95 59 99 90 58 61 15 53 98 84 39 85 54 78
S=332
0,0
(0 оценок)
Популярные вопросы: Информатика
oslipak
21.09.2020 08:08
Запиши выражение h+sh⋅n−1 в виде пригодном для использования в программе: 1.(h+s)/(h∗n−1) 2.h+sh⋅n−1 3.все ответы верные 4.(h+s)÷(h⋅n−1)...
Saida6666
25.11.2020 23:39
Үйге тапсырма: 1. Скрипт құру дегеніміз не?2. Управление командасының қызметі қандай?3. Scratch -те дыбысты қалай орнатамыз?4. Костюм кітапханасындағы командалар кай кезде қолданылады?...
красотуле444ка
25.05.2023 04:22
1)при размерах экрана (разрешении) 640•480 точек и количестве цветов 256 найти необходимый объём видеопамяти в кбайт. 2)для хранения растрового изображения размером 128•128 пикселей...
Саша13398
20.01.2021 19:50
Запишите на языке паскаль программу,которая формирует и выводит на экран строку символов,коды которых равны 66,69,71,79,78...
jasmin301
20.01.2021 19:50
Pascal! 30 написать программу, дано 4-х значное число...
Дианочка140
31.08.2021 18:34
Составьте блок-схему и опишите на языке программирования алгоритм вычисления площади круга. входные данные вводятся с клавиатуры...
lol1044
14.09.2020 03:41
Свойство алгоритма дискретность означает...
JûšțĞîřł
20.05.2023 19:42
Дана последовательность чисел, среди которых имеется один нуль. вывести на печать все числа до нуля включительно. abcpascal...
2017mariana
27.05.2020 00:12
Заполните пропуски в схеме: монархия сме-шанная абсо-лютная...
rasul1233
27.05.2020 00:12
Выполни чертеж и реши . длина зеленого отрезка 9см,а красного на 5см больше.какова длина красного отрезка?...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
// Внимание! Если программа не работает, обновите версию!
begin
var a:=ArrRandom(ReadInteger('n='),10,99); a.Println;
Writeln('S=',a.Where(t->t.Between(51,59)).Sum)
end.
Пример
n= 17
55 34 53 95 59 99 90 58 61 15 53 98 84 39 85 54 78
S=332