Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
О
ОБЖ
У
Українська мова
Х
Химия
Д
Другие предметы
Н
Немецкий язык
Б
Беларуская мова
М
Музыка
Э
Экономика
Ф
Физика
Б
Биология
О
Окружающий мир
У
Українська література
Р
Русский язык
Ф
Французский язык
П
Психология
О
Обществознание
А
Алгебра
М
МХК
Г
География
И
Информатика
П
Право
А
Английский язык
Г
Геометрия
Қ
Қазақ тiлi
Л
Литература
И
История
Показать больше
Показать меньше
1LOSI1
01.03.2020 23:44 •
Информатика
Нужно написать программу на языке паскаль. дан массив действительных чисел среди них есть равные. найти первый максимальный и заменить его нулём
Показать ответ
Ответ:
любимчик27
27.08.2020 10:23
PascalABC.NET 3.4.2, сборка 1837 от 11.10.2018Внимание! Если программа не работает, обновите версию!
begin
var a := ReadArrReal(ReadInteger('n='));
a[a.IndexMax] := 0;
a.Println
end.
n= 10-14.75 -62.2 20.7 53.01 -28.25 18.04 29.35 -29.21 53.01 -63.53-14.75 -62.2 20.7 0 -28.25 18.04 29.35 -29.21 53.01 -63.53
0,0
(0 оценок)
Популярные вопросы: Информатика
Дима566779
04.01.2020 17:13
Как называется инструмент графического редактора, который позволяет выбирать цвет при создании изображений?...
ulia200634
17.09.2021 10:58
Можете с задачей по информатике,из 4 задач решите те кто в 10 номере,со всеми решениями а не ответ,сразу...
LRM999919
15.11.2021 05:38
Күннің ұзақтығыай өзгеретінін бірӨзің тұратын жерде күннің ұзақтығы қалай өзгеапта бойы бақыла. Кестені толтыр.Күннің ұзақтығыКүніКүнніңшығуыКүнніңбатуыКүнніңұзақтығыАйыр-машылығы...
CuprumJewellier5
22.06.2022 18:20
Переделай задачу так, чтобы использовалась только переменная i....
7ag
15.03.2022 03:03
Было проведено 9 запусков программы, при которых в качестве значений переменных x и y вводились следующие пары чисел: (-3; -1), (-3; 9), (5; 1), (5; 5), (-3; -2), (-5; 8), (3; 5),...
masha32434
18.11.2020 16:38
Ребята объясните Составьте алгоритм и представьте его в виде блок-схемы и АЯ Ввод a, y. Если 7-у=0, то нет решения. Вывод s. Сохранить файл....
Собака2609
26.01.2020 16:31
Опишите последовательность создания трехмерной модели...
Hedulik
26.08.2021 22:28
Определите исходную плоскую фигуру, использованную для построения трехмерной фигуры (при построении не использовался ластик и клавиша...
кристина0052368
02.01.2023 03:04
Вкомпьютерной лаборатории 233m компьютеров, из них 41m- celeron m, 34m- amd duron, 51m- pentium d и 23m- athlon 64 x2, где m - основание некоторой системы счисления. в какой системе...
marinabelousov2
14.02.2022 19:14
Тест 3 два одинаковых сервера за 5 секунд могут обрабатывать 5 миллионов запросов от пользователей. сколько миллионов запросов могут обработать 9 таких сервера за 9 секунды? а) 9...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
begin
var a := ReadArrReal(ReadInteger('n='));
a[a.IndexMax] := 0;
a.Println
end.
n= 10-14.75 -62.2 20.7 53.01 -28.25 18.04 29.35 -29.21 53.01 -63.53-14.75 -62.2 20.7 0 -28.25 18.04 29.35 -29.21 53.01 -63.53