假设有杯子a(内盛可乐)，杯子b（内盛白水），杯子c（空），请用程序描述a、b两个杯子中所盛物质交换的过程。...

题目：

    假设有杯子a(内盛可乐)，杯子b（内盛白水），杯子c（空），请用程序描述a、b两个杯子中所盛物质交换的过程。

    （已知a，b两个正整数，要求，应用三个数交换的原理，把a，b值互换并输出）。

 

知识点：

    pascal程序的结构（整体上了解），p43

    数据类型：integer、real，p34~35

    变量定义：var，p37

    赋值语句：:= ，p46~47

    输入输出语句：read、readln、write、writeln、单场宽、双场宽，p48~53

 

代码：

 1 program shen1;
 2 
 3 var a,b,c:integer;
 4 BEGIN
 5   read(a,b);
 6   write('a=',a,' b=',b);
 7   c:=a;
 8   a:=b;
 9   b:=c;
10   write('a=',a,' b=',b);
11 END.

 

转载于:https://www.cnblogs.com/cnssc/p/6111625.html