Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
А
Английский язык
Х
Химия
Э
Экономика
П
Право
И
Информатика
У
Українська мова
Қ
Қазақ тiлi
О
ОБЖ
Н
Немецкий язык
Б
Беларуская мова
У
Українська література
М
Музыка
П
Психология
А
Алгебра
Л
Литература
Б
Биология
М
МХК
О
Окружающий мир
О
Обществознание
И
История
Г
Геометрия
Ф
Французский язык
Ф
Физика
Д
Другие предметы
Р
Русский язык
Г
География
Показать больше
Показать меньше
scream75821
26.09.2022 16:44 •
Информатика
Решите задачу в Паскаль
Показать ответ
Ответ:
bogussasa7
12.02.2021 21:54
begin
var x, y, z:integer;
read(x, y, z);
write(max(min(x, y), z) / 3);
end.
//PascalABC.NET
0,0
(0 оценок)
Ответ:
mirakle1
12.02.2021 21:54
Begin
(tab) var x, y, z:integer;
(tab) read(x,y,z);
(tab) write(max(min(x,y),z)/3);
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
bondaryulia2000
13.05.2023 07:59
Какие вы знаете операционные системы,не входящие в семейство windows?...
makushevvaleraozlps7
14.03.2020 11:10
День календаря Как известно день программиста приходится на 256 день года, в невисокосный год это - 13 сентября, а в високосный - 12.Аналогично предлагается распознать число и...
дядялёняййццйуйу
19.02.2023 09:05
Десятичное число 511 записано в системе счисления с основанием n (n 1). Определите минимальное значение n, при котором в полученной записи числа не все цифры одинаковые. В ответе...
MarkTell
31.08.2020 05:51
У исполнителя Омега две команды, которым присвоены номера: 1. вычти 12. припиши справа b Известно, что алгоритм 11221 переводит число 3 в число 176. Определите значение b. Объясните...
lololokgjh
19.02.2020 03:22
Распредели по колонкам имена переменных в соответствии с тем, можно их использовать в Python или нет очень нужна...
Shamorinka
05.09.2020 10:39
Выбери правильный алгоритм работы с программой ABBYY FineReader. 1. Бумажный носитель помещается в сканер. 2. В программе отдаётся команда Сканировать. Создаётся цифровая копия...
leonid90
07.01.2023 02:25
Скласти програму у Lazarus .Обчислити значення функції (малюнок у прикладеному файлі )...
marsik12912
04.07.2022 03:00
Знаходження мінімального елементу стовпчика та загального мінімуму (з індексами) з процедурамі ілі фунциямі пліс паскаль...
SABA30031
12.10.2022 00:41
.Алгоритм створений у програмі скреч .(6 букв) 2.послідовність команд виконання яких призводить до певного результату .(8 букв)3.частина команди у розгалуженні .(6 букв )4.команда...
zoobe1
22.02.2023 01:02
3. Який оператор реалізує дію: Змінній К: Boolean присвоїти значення True, якщо числа А,В,Супорядковані за зростанням, і значення False в протилежному випадку?Виберіть один з...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
begin
var x, y, z:integer;
read(x, y, z);
write(max(min(x, y), z) / 3);
end.
//PascalABC.NET
(tab) var x, y, z:integer;
(tab) read(x,y,z);
(tab) write(max(min(x,y),z)/3);
end.