Задать вопрос
12 декабря, 05:12

Найти max (a, b) через pascal

Помогите решить!

+2
Ответы (1)
  1. 12 декабря, 08:05
    0
    Var

    a, b:integer;

    Begin

    Write ('Введите два целых числа: ') ; ReadLn (a, b) ;

    if a > b then WriteLn ('Max = ', a)

    else WriteLn ('Max = ', b)

    End.
Знаете ответ?
Сомневаетесь в ответе?
Найдите правильный ответ на вопрос ✅ «Найти max (a, b) через pascal Помогите решить! ...» по предмету 📘 Информатика, а если вы сомневаетесь в правильности ответов или ответ отсутствует, то попробуйте воспользоваться умным поиском на сайте и найти ответы на похожие вопросы.
Смотреть другие ответы