用pascal语言急急急~~~各位帮忙撒..

来源：百度知道编辑：UC知道时间：2024/06/01 04:02:54

输入一个二位数,将其十位个位交换再输出.
我们老师写的时候是用到4个字母,可是...应该不用这么多吧...

var
a:integer;
begin
readln(a);
writeln((a mod 10)*10+(a div 10))
end.
要加分哦~
O(∩_∩)O~

var i:integer;
begin
readln(i);
i:=(i mod 10)*10+i div 10;
writeln(i);
end.
你的老师是谁啊？？！

program ex1(input,output);
var
x:integer;
begin
read(x);
write((x mod 10)*10+x div 10);
end.

用pascal语言 急急急~~~各位帮忙撒..