Войти
Регистрация
Спроси ai-bota
knowyourway54
13.05.2020 11:02
Дан массив, состоящий из 12 целых чисел. вывести на экран все элементы, которые больше числа х
Нажмите на рекламу ниже и сразу увидите ответ
↓
Популярные вопросы:
samirdebilGost
13.08.2021 17:52
Составьте программу вычисления функции y=2*x-sqrt (x) при изменении аргумента x от 0 до 6. вывод значений аргумента и функции организуйте в виде двух столбцов: x=...
меланамасимова
31.10.2020 06:55
РАЗВЕТВЛЁННЫЙ АЛГОРИТМ даны 3 числа а,b и с. Подсчитайте сколько из них двузначных чисел.используйте К (счётчик)...
Zver7777
25.08.2020 06:53
На с++ у второклассников популярна следующая : 101=1 8181515=4 1111112=0 8888888=14 1010101=3 7000007=? преподавателю программирования в некоем центре для одаренных...
влад2305
24.05.2022 17:36
Help please.калькулятор с выбором действий на паскале abc. принцип работы: 1. ввести первое и второе значения2.выводиться окно выбора действий: 1)+2)-3)*4)/5)[tex]...
Kashakom04
02.09.2020 08:15
Объем звукового файла 93,75 кбайт, количество уровней громкости - 256. какова длительность звучания этого файла, записанного с частотой дискретизации 24 кгц?...
Пусик95
05.11.2021 13:00
Решить алфавит некоторого языка содержит 128 символов. тогда объем текста на этом языке в 2000 символов равен (выбрать правильный ответ) 256 бит 512 бит 2 кбита 14...
dinka41
23.04.2023 01:39
Склавиатуры вводится число а,в, и целое число х. если х=0 а,в-real найти разность а-в, 1-а*в, 2-х: integer a: в, в противном случае найти сумму....
vladus20012
28.05.2020 13:53
Склавиатуры вводится числа а,в, и целое число х. если х=0, найти разность а-в, 1-а*в, 2-а: в, в противном случае найти сумму....
joryk2012
11.10.2022 01:25
Надо. исправте ошибки. program untitled; uses crt; type m=array[1..100]of integer; e= file of integer; var k,t: integer; f,g,h: e; i,n,c,a: integer; begin assign(f,...
AbsoJl
11.10.2022 01:25
Нарисовать паровоз с колёсами в pascal abs с колёсами через line и cirkle...
Ответ:
Nastenka0003
07.10.2020 08:04
// PascalABC.NET 3.3, сборка 1576 от 16.11.2017
// Внимание! Если программа не работает, обновите версию!
begin
var a:=ReadArrInteger('Введите массив', 12);
var x:=ReadInteger('x =');
a.Where(t -> t > x).Println();
end.
0,0
(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота