Информатика, опубликовано 2018-08-22 23:58:25 by Гость
Дано двузначное число Определить одинаковы ли его цифры
Ответ оставил Гость
Var a:integer;
b:boolean;
begin
readln(a);
if a mod 10 = a div 10 then writeln(not b)
else writeln(b);
end.
Не нашли ответа?
Если вы не нашли ответа на свой вопрос, или сомневаетесь в его правильности, то можете воспользоваться формой ниже и уточнить решение. Или воспользуйтесь формой поиска и найдите похожие ответы по предмету Информатика.