Информатика Архивный вопрос

Условный оператор. Задача 5
Даны три целых числа. Определить, имеется ли среди них хотя бы одна пара равных между собой чисел.
Формат входных данных
Входной файл содержит три целых числа через пробел.
Формат выходных данных
Выведите 'YES' если это так, и 'NO' в противном случае.
Примеры:
Вход
544 935 911
Выход
NO

Нет комментариев

Ответы

Гость

Всё, что смог
var  a,b,c: integer;  begin
write('Введите три целых числа через пробел: ');read(a, b, c);
if a=b then  writeln('YES')    else writeln('NO');       if b=c then          writeln('YES')            else writeln('NO');                if a=c then                  writeln('YES')                    else writeln ('NO');

end.

1 комментария:
var a,b,c: integer;beginwrite('Введите три целых числа через пробел: ');read(a, b, c);if a=b then writeln('YES') else writeln('NO'); if b=c then writeln('YES') else writeln('NO'); if a=c then writeln('YES') else writeln ('NO');end.

Похожие вопросы