Ответ: program ff;varx:string;beginwriteln(‘Введите x:’);readln(x);if x.Length=2 then begin x:=x[2]+x[1]; writeln(x); end else Writeln(‘Введенное вами число имеет неверный формат’);end.
Источник znanija.site
Ответ: program ff;varx:string;beginwriteln(‘Введите x:’);readln(x);if x.Length=2 then begin x:=x[2]+x[1]; writeln(x); end else Writeln(‘Введенное вами число имеет неверный формат’);end.
Источник znanija.site