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

Question

Информатика

Васа

16 января, 05:10

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

+1

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