Выведите true если из 3 цифр один ровно 1, потивном случе false

Question

Информатика

Тоша

6 декабря, 01:35

Выведите true если из 3 цифр один ровно 1, потивном случе false

+5

Ответы (1)

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

Юра · Answer 1

Pascal:

var a, b, c:integer;

begin

readln (a, b, c) ;

if a=1 then writeln ('true') else

if b=1 then writeln ('true') else

if c=1 then writeln ('true') else

writeln ('false') ;

end.