tutotveti.ru
Предметы
Биология
Українська мова
Музыка
Французский язык
Физика
МХК
Обществознание
Психология
ОБЖ
Право
Беларуская мова
Литература
Химия
Українська література
Экономика
Немецкий язык
География
Информатика
Қазақ тiлi
Геометрия
Английский язык
Русский язык
Окружающий мир
Алгебра
История
Другие предметы
Видео-ответы
ПОИСК
Войти
Регистрация
Информатика
Найти максимум из трёх чисел,
Найти максимум из трёх чисел, числа рандомные от 0 до 20, предусмотреть случай, что числа равны (нужно паскале написать )
Nomatdicov
3 23.09.2019 22:50
0
Ответы
linka737
08.10.2020 13:32
Function Max(a,b: integer): integer;begin if a > b then Max := a else Max := b;end;
Использование:
WriteLn(Max(a, Max(b, c)));
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
misterion10
12.08.2019 04:10
Укажите наименьшее двухзначное натуральное число,для которого истинно логическое выражение: ((первая цифра равна 2)v(первая цифра равна 5))стрелочка((вторая цифра больше первой)^(вторая...
Flamingo2006
12.08.2019 04:10
Вкаком формате нужно сахранить файл чтобы он мог был прочитан в других преложения без сахранения форматирования...
wawking86rus
18.02.2020 08:58
с решениемВ зависимости от значения порядка представить нескольковариантов изображения чисел в форме с плавающей запятой, включая нормали-зованный видА = +0,01101(2)...
sergei199
18.02.2020 08:55
РЕШИТЕ ЗАДАЧУ НА ТЕМУ ФОРМАЛЬНОЕ ОПИСАНИЕ РЕАЛЬНЫХ ОБЪЕКТОВ М ПРОЦЕССОВ ...
FACE02
18.02.2020 08:50
msi h61m p21 b3 совместимы ли с ZOTAC GTX 960 2 Гб 128 бит GDDR5? если нет какую мощную видеокарту можно взять?...
Patriot73
18.02.2020 08:21
Найдите значение силы противодействия при погружении в воду тела объемом 8 м^3...
oleg410
18.02.2020 08:08
Приведите пример циклического алгаритма...
annadubinkina
18.02.2020 10:01
ax + b = 0 составьте програму для решения уравнения на python...
Дазуки
18.02.2020 09:52
Сақ тайпасы қайда орналасқан?...
рррр194
18.02.2020 09:48
Если информация имеет объём 14 мб, определите её объём в битах, байтах, килобайтах....
Популярные вопросы
Придумайте и напишите сказку на тему «Друг познаётся в несчастье» Объём текста...
3
Фабрика за первый месяц выпустила 480,7кг. Продукции. Во второй месяц увеличила...
1
6. Дайте характеристику «Революционного этюда» Ф.ШОПЕНА, проанализировав его...
1
5-тапсырма. Берілген қарасөз мазмұнын негізге ала отырып, Абайғамінездеме беріңдер....
1
Задание 1: Установите соответствия между значением фразеологизма и фразеологизмом.1....
2
How long is the flight? asked Miriam. Miriam asked me. A) how long the flight...
3
1. Определи верное утверждение А) В тропосфере сосредоточено 80% воздуха, поэтому...
3
Сор2 рус.лит 5 класс 2 четвярть1.2.3.4. задание:3...
2
Визначте формулу органічної речовини якщо відомі масові частки елементів C-...
2
В прямоугольном треугольнике один катет равен 20 см, а высота, опущенная к...
3
Использование:
WriteLn(Max(a, Max(b, c)));