Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
О
ОБЖ
У
Українська мова
Д
Другие предметы
Х
Химия
М
Музыка
Н
Немецкий язык
Б
Беларуская мова
Э
Экономика
Ф
Физика
Б
Биология
О
Окружающий мир
Р
Русский язык
У
Українська література
Ф
Французский язык
П
Психология
А
Алгебра
О
Обществознание
М
МХК
В
Видео-ответы
Г
География
П
Право
Г
Геометрия
А
Английский язык
И
Информатика
Қ
Қазақ тiлi
Л
Литература
И
История
Показать больше
Показать меньше
pilizaveta13
22.03.2023 03:41 •
Информатика
Напишите программы на PascalABC
Показать ответ
Ответ:
veronekareshet
10.01.2021 23:34
PascalABC.NET
Задание 1:
###'Введите два числа X и Y:'.Pr;var (X, Y) := RI2;var minXY := min(X, Y);if X = minXY then X := 0;if Y = minXY then Y := 0;$'Результат: {X} {Y}'.Pr
Задание 2:
###'Введите a и b:'.Pr;var (a, b) := RI2;'Введите три числа:'.Pr;$'Результат: {RAI(3).Wh(x → x in a..b).Str}'.Pr
0,0
(0 оценок)
Популярные вопросы: Информатика
p5wf389f
07.08.2020 10:57
Вмассиве подсчитать количество элементов, которые не делятся на 7 без остатка. (элементов массива: 7)....
nikolayAK
17.05.2021 21:52
Яка з технології бездротових мереж забезпечує максимальну швидкість передавання даних...
cccggg93
08.02.2020 10:35
1. числа записанные в свернутой форме, представить в виде полинома разложения и подсчитать значение числа в десятичной системе счисления: 15с,в316. 2. перевести из восьмеричной системы...
123654789e
06.03.2020 12:07
4.перевести из десятичной системы счисления в двоичную: 9,045. 5.перевести из десятичной системы счисления в восьмеричную: 0,497. 6.перевести из десятичной системы счисления в шестнадцатеричную...
Slysly
02.04.2022 20:51
7.перевести из двоичной системы счисления в: а) восьмеричную; б)шестнадцатеричную: 11,10111. 8.перевести из десятичной системы счисления в: а) восьмеричную; б)шестнадцатеричную: 29,765....
bogdanostapenko
03.04.2020 20:13
А4. если несжатое растровое изображение размером 50 х 100 пикселей занимает 2 кб памяти, то максимально возможное количество цветов в палитре равно...
Maria21Kaplina2
27.04.2020 22:32
с задачей на python: Пишется список N, заполненный целочисленными значениями. Требуется вывести на экран значения, которык будут противоположенними значениям элементов списка. Пример:дан...
radmirnemyshov
26.01.2021 11:37
11,25 Блок ячеек А1:44 заполнен числами: 15, 10, 32, -12. Укажите результат выполнения функции =СЧЁТ (A1:А4)...
Тирия
05.08.2022 19:30
Суреттерді SketchUp Make программасында кандай куралдарды пайдаланып салуға болады?...
ezio19
20.09.2022 11:35
Написать программу для : из введённых с клавиатуры 3-х чисел вывести на экран наибольшее. (использовать условный оператор) , нужно и...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
Задание 1:
###'Введите два числа X и Y:'.Pr;var (X, Y) := RI2;var minXY := min(X, Y);if X = minXY then X := 0;if Y = minXY then Y := 0;$'Результат: {X} {Y}'.PrЗадание 2:
###'Введите a и b:'.Pr;var (a, b) := RI2;'Введите три числа:'.Pr;$'Результат: {RAI(3).Wh(x → x in a..b).Str}'.Pr