№1 даны два целых числа. программа должна вывести число 1, еслипервое число больше второго, число 2, если второе больше первого или число 0,если они равны.входные данныевводятся два целых числа.выходные данныевыведите ответ на .примечаниеэту желательно решить с использованием каскадных инструкций else.примерывходные данные12выходные данные2 №2 даны три целых числа. найдите наибольшее из них (программадолжна вывести ровно одно целое число).используйте ровно два оператора сравнения (> , < , > =, < =) для решения . использовать функции max и min нельзя.входные данныевводится три целых числа.выходные данныевыведите ответ на .примерывходные данные123выходные данные3 №3 дано натуральное число. требуется определить, является ли год сданным номером високосным. если год является високосным, то выведите yes,иначе выведите no. напомним, что в соответствии с григорианским календарем, год является високосным, если его номер кратен 4, но не кратен 100, а также если онкратен 400входные данныевводится одно натуральное число.выходные данныевыведите ответ на .примерывходные данные100выходные данныеno
Program zz;var a,b,c,d:integer;beginwriteln('Введите A:',a);readln(a);writeln('Введите B:',b);readln(b);writeln('Введите C:',c);readln(c);if a >= b then d := b else d := b; if c > d then d := c;writeln ('Максимальное из них: ', d);end.