Даны 3 числа проверить что они все различны

Question

Информатика

Конон

1 мая, 13:39

Даны 3 числа проверить что они все различны

+2

Ответы (1)

Знаете ответ на вопрос?

Арина · Answer 1

Если я правильно понял вопрос, то так:

var a, b, c:int64;

begin

read (a) ;

read (b) ;

read (c) ;

if (ab) and (ac) and (bc) then write ('Chisla razlichni')

else write ('Chisla ne razlichni') ;

end.