论坛如何让老师帮你看题？作业2、交换两个数值型变量a和b的值programex_change;vara,b,c:integer;beginread(a,b);c:=a;a:=b;b:=c;write(a,'',b);end.Description：对于一个任意的三位自然数X，编程计算其各个数位上的数字之和S。Input：输入一行，只有一个整数x(100<=x<=999)Output：输出只有一行，包括1个整数SampleInput123SampleOutput6Pascal的运算符算术运算符／(实数除)得到结果为实型.如5.0/2.0=2.5，5/2=2.5，4/2=2.0而不等于2。DIV(整除)DIV它要求除数和被除数均为整型,结果也为整型。10DIV2=5,10DIV3=3,5DIV10=0.-15DIV4=-3。DIV运算只取商的整数部分，参与DIV运算的两个对象不能为实型，符号参与计算。mod(求余)，也只能用于整数运算，结果为整数。例如:10mod4=2,-17mod4=-1,4mod(-3)=1,-4mod3=-1，即amodb=a-(adivb)*b，符号根据被除数而定。运算符的优先级Description：对于一个任意的三位自然数X，编程计算其各个数位上的数字之和S。Input：输入一行，只有一个整数x(100<=x<=999)Output：输出只有一行，包括1个整数SampleInput123SampleOutput6programrm4;varx,y,g,s,b:integer;beginread(x);g:=xmod10;b:=xdiv100;s:=xdiv10mod10;y:=g+s+b;write(y);end.调试成功后，选中，然后选edit中的copytowindows如果是外面的复制进去（如上节课没有完成的程序），选最后一条本节课任务：1、调试入门42、调试正确，复制到自己主题下3、如果顺利，继续下面的程序题5：Description:输入一个三位自然数，然后把这个数的百位数与个位数对调，输出对调后的数Input输入一行，只有一个整数x(100<=x<=999)。Output输出只有一行，包括1个整数。SampleInput123SampleOutput321题6：Description：求商数和余数，输入a,b两个整数，编程求出a除以b得到的商和余数。Input输入一行，只有两个整数(中间有空格)。Output输出只有一行，两个整数(中间有空格)。SampleInput73SampleOutput21题7：Description：任意读入一个四位整数，颠倒后输出。Input输入一行，只有一个整数x(1000<=x<=9999)。Output输出只有一行，包括1个整数。SampleInput4789SampleOutput9874