Войти
Регистрация
Спроси ai-bota
11Ольга1111111
19.12.2020 15:44
Программа на паскаль 9) вводится произвольная последовательность целых чисел. найти сумму чисел больших наперед заданного числа x
Нажмите на рекламу ниже и сразу увидите ответ
↓
Популярные вопросы:
Kamilena2010
21.08.2021 12:19
Создать в PascalABC программу, содержащую 5 различных графических примитивов, координаты в графических примитивах выразить относительно переменных Х и Y. Program...
Людочка6789
04.07.2020 01:14
При выполнении задания сначала запишите задание на математическом языке и только потом приступайте к упрощению, т.е. применяя формулы. Не забывайте порядок действия....
pziipzii
17.12.2020 03:57
Дано три числа - длина стороны квадрата и длины сторон прямоугольника. определить, можно ли прямоугольник поместить в квадрат. входные данные: во входном потоке...
Cokolowka
20.06.2021 10:50
Задание по технологии придумать инновационную вещь которой нет на земле по типу этой...
vadim1154
18.05.2020 07:52
Даны 4 целых числа, записанных в двоичной системе : 10001011; 10111000; 10011011; 10110100. Сколько среди них чисел, больших, чем 9А16?...
95731
29.10.2022 17:12
Вклассе 30 учеников, и все ходят в спортивные секции. 15 человек ходят в футбольную секцию, 10 в баскетбольную, и 18 в волейбольную. некоторые успевают заниматься...
Теразини
03.08.2020 11:28
1. даны следующие три высказывания: а. если блюдо зеленое, то оно не соленое. б. если блюдо зеленое, то он не зеленое. в. если блюдо соленое, то неверно что оно...
mneholodno
03.08.2020 11:28
Вмассиве найти наименьший элемент. 9 класс, !...
anja565449
08.10.2021 12:18
Росставте коэффициенты и объясните пеньку zno+hno3→zn(no3)2 20 !...
sofyadeeva
14.02.2022 23:21
Постройте график функции, , с полным оформлением! давно строилм такого типа графики, не помню уже как это делать...
Ответ:
аореакенгшлгн
07.10.2020 17:53
//PascalABC.NET 3.3,сборка 1611 от 06.01.2018
//Внимание! Если программа не работает, обновите версию!
begin
var mas:=ReadlnString('Вводите').ToIntegers;
var x:=readinteger('x=');
Writeln('Сумма=',mas.Where(t->t>x).Sum);
end.
0,0
(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота