Войти
Регистрация
Спроси ai-bota
В
Все
Б
Биология
Б
Беларуская мова
У
Українська мова
А
Алгебра
Р
Русский язык
О
ОБЖ
И
История
Ф
Физика
Қ
Қазақ тiлi
О
Окружающий мир
Э
Экономика
Н
Немецкий язык
Х
Химия
П
Право
П
Психология
Д
Другие предметы
Л
Литература
Г
География
Ф
Французский язык
М
Математика
М
Музыка
А
Английский язык
М
МХК
У
Українська література
И
Информатика
О
Обществознание
Г
Геометрия
Показать больше
Показать меньше
СешМАНИ
13.02.2022 15:45 •
Информатика
Даны действительные числа х у z вывести на печать минимальное из чисел
Показать ответ
Ответ:
гиений1509
02.10.2020 23:37
Function Min(a,b : Integer) : Integer;
Begin
If a<b then Min:=a else Min:=b;
end;
Var x,y,z : Integer;
Begin
Readln(x,y,z);
Writeln(Min(Min(x,y),z));
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
vadimvadimvadimvadim
07.01.2020 18:40
Составить таблицы истинности для следующих логических выражений: F=A&(C- B) F=B&((A B) VA) F=B (CvA) F=B&((A B) - A)...
ЕлизаветаСиянко
12.07.2021 01:43
Выбери основные типы данных в MS Excel. цифры, даты, числатекст, числа, формулычисла, формулы, времямесяц, время, текст БОЛЬШЕ НЕТУ(...
NataliaKotic
07.06.2020 17:13
Начальный вклад в банке равен 1000 руб. Через каждый месяц размер вклада увеличивается на P процентов от имеющейся суммы (P — вещественное число, 0 P 25). По данному P определить,...
neftyanik102
15.11.2020 01:28
Приведите словестное описание алгоритма сложения двух обыкновенных дробей a/b и c/d...
Ganshit
12.12.2022 12:14
Ввести одномерный массив из 12 целых чисел с генератора случайных чисел (числа в диапазоне [-10; 10] и заменить отрицательные элементы числом 1 (организовать вывод исходного...
MrHard1
02.09.2020 20:23
Сумма двух первых чисел заданного четырехзначного числа равна сумме двух его последних цифр...
fish1704
02.09.2020 20:23
Нужно дополнить программу недостающими . (получите новую строку,заменив в заданной строке все слоги ма на па .) program zadacha2; var t,st: string; n,i: integer; begin writeln(...
Logas25743
08.10.2020 23:25
Добро Напишите программу, которая будет считывать имя пользователя, затем выводить на экран сообщение: Dobro pozhalovat, [имя пользователя]! . с этой программой заранее)...
Карина2203
30.10.2022 11:27
Вопрос №1 ? Какая вкладка в окне Инспектор объектов отражает видимую сторону компонента (размеры, формы, цвет, шрифт и т.д.)? Список форм Список свойств Свойства Список объектов...
anna228po
26.10.2020 11:44
ДОМАШНЕЕ ЗАДАНИЕ 1. Создайте «Пригласительные» в MS Word.2. Создайте обложку тетради, используя объекты WordArt.3. Определите функции инструментов и заполните таблицу....
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
Begin
If a<b then Min:=a else Min:=b;
end;
Var x,y,z : Integer;
Begin
Readln(x,y,z);
Writeln(Min(Min(x,y),z));
end.