Войти
Регистрация
Спроси ai-bota
В
Все
Х
Химия
В
Видео-ответы
А
Алгебра
Г
Геометрия
О
ОБЖ
Д
Другие предметы
У
Українська література
Р
Русский язык
Б
Беларуская мова
У
Українська мова
Э
Экономика
Ф
Физика
М
Математика
Ф
Французский язык
Г
География
И
Информатика
М
МХК
О
Окружающий мир
П
Психология
Н
Немецкий язык
О
Обществознание
П
Право
И
История
М
Музыка
Л
Литература
Қ
Қазақ тiлi
Б
Биология
А
Английский язык
Показать больше
Показать меньше
pashalol3
29.04.2022 03:00 •
Информатика
Запишите прграмму условного оператора, в котором сравнивают значения переменных а и b. если число больше, то вывести его на печать.
Ответ:
санс
01.09.2020 18:23
Begin
var (a,b):=ReadInteger2('Введите a,b->');
if a>b then Writeln(a,' больше.') else
if a=b then Writeln(a,' равно ',b) else Writeln(b,' больше.');
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
какчитаетсяэтосказка
17.09.2020 18:07
Впрограмме используется одномерный целочисленный массив a с индексами от 1 до 25. ниже представлен фрагмент программы, в котором значения элементов: n: = 25; a[1]:...
kazorinJeka
14.01.2020 23:29
На паскаль, вывести на экран все месяца года...
МиллкаВах
17.01.2022 16:02
Напишите цикл, который убирает из списка чисел от 1 до 15 все числа кратные 3. Используйте оператор continue...
xeniaverner
01.10.2021 00:31
Один из углов треугольника в два раза больше второго и на 30° меньше третьего. Найдите все углы треугольника. Укажите тип треугольника по углам (остроугольный,...
Panda9881
01.10.2021 00:31
15 В понедельник музей посетило 48 человек, и это была самая низкая посещаемостьза неделю. Во вторник в музее открылась новая выставка, поэтому посетителей былона...
vladislavtanasienko1
04.03.2020 07:08
Що можна сказати про розміщення кіл , якщо . 1=8,2,10см . 2=11,7,4см . 3=320,80,20мм . 4=32,8,50см . ДО ІТЬЬ БУДЬ ЛАСКА МЕНІ ТРЕБА ЗДАТИ ЦЕ СЬОГОДНІ А Я НЕЗНАЮ...
EvelinaKPACABA
04.03.2020 07:08
ИТОГОВАЯ КР Равнобедренные треугольники ABC и ADC имеют общее основание AC и лежат по одну сторону от прямой AC. Докажите, что углы ADB и CDB равны....
976Марина1111111111
26.11.2020 10:54
Прочитай. Соедини народные приметы для определения погоды....
shaxnozatosheva
06.12.2021 20:11
Які чотири українські міста були на початку XXст. найбільшими за численістю еаселення ?...
bekker222
21.06.2021 17:31
Вкажіть що спільного та відмінного у УНДП та УСДП?...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
var (a,b):=ReadInteger2('Введите a,b->');
if a>b then Writeln(a,' больше.') else
if a=b then Writeln(a,' равно ',b) else Writeln(b,' больше.');
end.