logo
Войти Регистрация Спроси ai-bota


Olya10783
30.12.2021 16:16

Напишите программу, которая выводит на экран номер первого максимального числа среди 15 чисел. PASCAL ABC Тема; Минимальный(Максимальный) элемент массива

Нажмите на рекламу ниже и сразу увидите ответ
↓
Популярные вопросы:
Ильяна111
Ильяна111
06.01.2023 08:00
пройти очень важный тест, чтобы получить сертификат. Очень важно. Заранее благодарен за ответ. Сами во на фотках (в виде текста система не позволила задать во пройти очень...
Маришка1231
Маришка1231
14.04.2022 07:36
ИЩУ ТЕХ, КТО МОжЕТ СДЕЛАТЬ ЗАДАНИЯ ПО html ​...
Dzean777
Dzean777
02.12.2020 02:27
Дана числовая последовательность: 1,4,7,10, какое число состоит на 20м месте? а) 58 в) 59 с) 60 д) 61...
msakinat
msakinat
20.11.2022 03:18
Написать программу поиска значения максимального элемента массива...
smirnovakrestin
smirnovakrestin
20.11.2022 03:18
Трое друзей, футбольных болельщиков, спорили о результатах предстоящего турнира. мнение юрия: «вот увидите, барселона не станет первой. зенит будет первым». мнение виктора:...
osipovalex1969
osipovalex1969
20.11.2022 03:18
Совокупность всех компьютерных программ (2 слова). пакет программ, работой компьютера и обеспечивающий взаимодействие между человеком и компьютером. (2 слова). прикладные...
vlada2207
vlada2207
20.11.2022 03:18
Сравните(поставьте знак отношения): , , = 1. 100000 кбайт 100 мбайт 2. 512 бит 50 байт 3. 1024 байт 1 кбайт 4. 8 гбайт 80000 мбайт 5. 16 байт 128 бит...
astahovanadezh
astahovanadezh
20.11.2022 03:18
Что ещё спрятали бим и бом 4 класс) составь алгоритм расшифровки слова. запиши что получается после каждого действия? начало , запиши слово( у бима слово кажлор, у бома колмес),поменяй...
August333
August333
28.01.2022 19:21
Ввести два числа. Если их сумма больше 100, то сумму уменьшить в 2 раза, в противном случае увеличить в 2 раза....
KVASSok
KVASSok
09.01.2023 23:42
Подсчитать количество чисел в одномерном массиве размером 25.кратным 5.Массив состоит из целых чисел .введенных с клавиатуры....
Ответ:
JoraUai0
24.11.2020 13:47

begin

 var q := ReadArrInteger(15);

 print(q.IndexOf(q.Max) + 1);

end.

Объяснение:

PascalABC.NET 3.5.1

0,0(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
О НАС
СООБЩЕСТВО
ПОМОЩЬ
App
.
.
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота