tutotveti.ru
Предметы
Биология
Українська мова
Музыка
Французский язык
Физика
МХК
Обществознание
Психология
ОБЖ
Право
Беларуская мова
Литература
Химия
Українська література
Экономика
Немецкий язык
География
Информатика
Қазақ тiлi
Геометрия
Английский язык
Русский язык
Окружающий мир
Алгебра
История
Другие предметы
Видео-ответы
ПОИСК
Войти
Регистрация
Информатика
Найти наибольшее из 10 чисел
Найти наибольшее из 10 чисел вводимых с клавиатуры. программировать на языке pascal
qalaysiz345
2 07.09.2019 08:00
1
Ответы
ulianaazet66
06.10.2020 22:46
// PascalABC.NET 3.3, сборка 1547 от 07.10.2017
// Внимание! Если программа не работает, обновите версию!
begin
Writeln('Max=',ReadSeqReal('Введите 10 чисел:',10).Max)
end.
Пример
Введите 10 чисел: 45 23.4 -24 0 163 -32 12 45 -12 100
Max=163
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
Lala090
22.04.2020 10:57
Каковы основные правила именования файлов в операционной системе, установленной на компьютерах? ответ:...
Kristinkasssd001
22.04.2020 10:57
1) на какой идее основан метод пузырька? метод выбора? 2) Объясните, зачем нужен вложенный цикл в описанных методах сортировки. 3) Сравните метод пузырька и метод выбора. Какой из...
Nastromanova
22.04.2020 10:57
Запишите математические выражения на языке Паскаль и порядок выполнения операций...
foben1
05.04.2021 09:15
Создание и оформление презентаци. Урок 2 Абай хочет изменить размер изображения. Но вокруг изображения нет маркеровизменения размеров. Почему?Изображение не выделеномаркеры были удаленыверсия...
Valya039782
05.04.2021 09:18
яким чином ви можете перетворити масив [ 3, 2,1] у рядок Is bigger than 1 за до методу join...
Чаромаг
05.04.2021 09:18
Действия: Создание новой призентации изменение вида фона показ презентации на экране Выполняемая команда ...
FGHJER
06.04.2019 19:33
Программа на c++. 40 ! с классами описать класс - словарь , обеспечивающий возможность хранения нескольких вариантов перевода для каждого слова. реализовать доступ по строковому индексу...
oksanaverner00
06.04.2019 19:17
Уисполнителя две команды: 1. прибавь 1 2. умножь на 2 выполняя первую из них калькулятор прибавляет к данному числу 1 , а вторую умножает на 2. можно использовать не более десяти команд....
Ferdgi
16.09.2019 02:40
Средняя скорость передачи данных по некоторому каналу связи равно 30720 бит/с определите, сколько понадобится секунд, чтобы передать по этому каналу 80 страниц текста, каждая страница...
Govnyuk
16.09.2019 02:40
Написать программу нахождения суммы всех положительных целых чисел, не превышающих данного натурального числа n, используя цикл с параметром....
Популярные вопросы
Какое количество теплоты потребуется, чтобы 0,5кг льда при 0°С превратить в пар...
2
снесходительные во Франции это...
2
Расскажи об образовани центрального государства Испании...
3
Каковы направления внутренней и внешней политики Джаваншира?...
1
РЕШИТЬ НА ПАЙТОНЕ Добавьте к программе про зарплаты следующую функцию: Top3() -...
2
Замените знаменательные части предложений возможными фразеологическими оборотами....
3
Как римскими цифрами записать 15 ?...
3
Найти интервалы возрастания и убывания функции F(x)=x^3-4x^2+5x-3...
3
Підкерсліть граматичну основу в реченні. Нехай минуле буде все позаду, нехай майбутнє...
3
Решите Найти: Дано: А B C D 4 52 . Найти: Дано : B С А 8см 9см 3 0 03. Найти: Дано:...
3
// Внимание! Если программа не работает, обновите версию!
begin
Writeln('Max=',ReadSeqReal('Введите 10 чисел:',10).Max)
end.
Пример
Введите 10 чисел: 45 23.4 -24 0 163 -32 12 45 -12 100
Max=163