выведите true если из 3 цифр один ровно 1, потивном случе false
Ответы на вопрос
Ответил MrKlimaD
0
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.
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.
Новые вопросы