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

Question

Информатика

Элюша

20 октября, 15:52

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

+4

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