现在高考要回户籍地吗:PASCAL看程序写结果

来源：百度文库编辑：中科新闻网时间：2024/04/27 16:16:36

1、Program ex_1(input,output);
Var m,n,i,j,k,temp:integer;
Begin
Readln(m,n,i,j);
If m>n then
Begin
temp:=i;
i:=j;
j:=temp;
End;
Writeln(m：3,n:3,i:3,j:3);
End.

输入 3 5 7 9 输出
输入 6 4 0 8 输出

2、Program ex_2(input, output);
Var i, j, m, n: integer;
A: array [1..30] of integer;
Begin
M: =0;
For i: =1 to 20 do a [I]: =I;
For i: =1 to 20 do
Begin
M: =m+2*a [I];
N: =m div I
End;
Writeln (m: 8,n:8)
End.
输出

PASCAL看程序写结果看程序写结果看程序写结果 C语言看程序写结果快~~~~~~~~~~~~``` 简单的C语言看程序写结果急图的遍历(pascal)程序怎么写 2005NOIP的PASCAL语言程序结果第三题？ PASCAL程序根据C程序写结果 PASCAL问题~如何写程序啊~~~谢谢了