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

Question

Информатика

Матяша

28 марта, 10:49

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

+1

Ответы (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.