На входе двухзначное число на выходе наоборот

Question

Информатика

Антонидка

7 августа, 13:11

На входе двухзначное число на выходе наоборот

+1

Ответы (1)

Знаете ответ?

Маркеллина · Answer 1

Var c1, c2:char;

x:string;

beginwriteln ('введите двухзначное число') ;

readln (x) ;

if length (x) = 2 then begin

c1:=x[1];

c2:=x[2];

writeln ('число наоборот = '+c2+c1) ;

end

else writeln ('ошибка, невероне число') ;

end.