составить программу АВС проверить истинность высказывания:"Среди трех данных целых чисел есть хотя бы одна пара совпадающих"

7 Мар 2019 в 19:43
564 +1
1
Ответы
1

var a,b,c: integer;

begin

readln(a,b,c);

writeln((a=b)or(a=c)or(b=c));

end.

5 Ноя 2019 в 00:02
Не можешь разобраться в этой теме?
Обратись за помощью к экспертам
Гарантированные бесплатные доработки в течение 1 года
Быстрое выполнение от 2 часов
Проверка работы на плагиат
Поможем написать учебную работу
Прямой эфир