Question

Паскаль,составить программу: Найти равные значения из чисел a, b, c, если введенное число X больше 2, иначе вывести сообщение «поиск не состоялся»

Answer 1

var
a, b, c, x: longint;
begin
writeln('Введите a, b, c и x:');
readln(a, b, c, x);
if (x > 2) then begin
if (a = b) then
writeln('a и b равны');
if (b = c) then
writeln('b и c равны');
if (a = c) then
writeln('a и c равны');
end
else
writeln('Поиск не состоялся');
end.

Answer 2

по моему, если одно из чисел А. Б. С меньше 2.

Answer 3

там написано, что надо найти равные значения из чисел a, b, c, если введенное число X больше 2, а не a, b и c меньше 2