作业帮一道 PASCAL的简单题目谁帮我把下面的代码每句话都帮我做个注解,要解释清楚^^^^^program 输入2个数,求最大和最小值;const n=5;typeno=array[1..n] of integer;s=array[1..n] of real;vari:integer;k:real;num:no;score:s;beg
来源：学生作业帮助网 编辑：作业帮 时间：2024/11/17 10:24:55
![一道 PASCAL的简单题目谁帮我把下面的代码每句话都帮我做个注解,要解释清楚^^^^^program 输入2个数,求最大和最小值;const n=5;typeno=array[1..n] of integer;s=array[1..n] of real;vari:integer;k:real;num:no;score:s;beg](/uploads/image/z/5171819-59-9.jpg?t=%E4%B8%80%E9%81%93+PASCAL%E7%9A%84%E7%AE%80%E5%8D%95%E9%A2%98%E7%9B%AE%E8%B0%81%E5%B8%AE%E6%88%91%E6%8A%8A%E4%B8%8B%E9%9D%A2%E7%9A%84%E4%BB%A3%E7%A0%81%E6%AF%8F%E5%8F%A5%E8%AF%9D%E9%83%BD%E5%B8%AE%E6%88%91%E5%81%9A%E4%B8%AA%E6%B3%A8%E8%A7%A3%2C%E8%A6%81%E8%A7%A3%E9%87%8A%E6%B8%85%E6%A5%9A%5E%5E%5E%5E%5Eprogram+%E8%BE%93%E5%85%A52%E4%B8%AA%E6%95%B0%2C%E6%B1%82%E6%9C%80%E5%A4%A7%E5%92%8C%E6%9C%80%E5%B0%8F%E5%80%BC%3Bconst+n%3D5%3Btypeno%3Darray%5B1..n%5D+of+integer%3Bs%3Darray%5B1..n%5D+of+real%3Bvari%3Ainteger%3Bk%3Areal%3Bnum%3Ano%3Bscore%3As%3Bbeg)
一道 PASCAL的简单题目谁帮我把下面的代码每句话都帮我做个注解,要解释清楚^^^^^program 输入2个数,求最大和最小值;const n=5;typeno=array[1..n] of integer;s=array[1..n] of real;vari:integer;k:real;num:no;score:s;beg
一道 PASCAL的简单题目
谁帮我把下面的代码每句话都帮我做个注解,要解释清楚^^^^^
program 输入2个数,求最大和最小值;
const n=5;
type
no=array[1..n] of integer;
s=array[1..n] of real;
var
i:integer;
k:real;
num:no;
score:s;
begin
K:=0;
of i:=1 to n do
begin
readln(num[i],score[i]);
k:=k+score[i];
end;
writeln(num[i],score[i]);
readln;
end.
一道 PASCAL的简单题目谁帮我把下面的代码每句话都帮我做个注解,要解释清楚^^^^^program 输入2个数,求最大和最小值;const n=5;typeno=array[1..n] of integer;s=array[1..n] of real;vari:integer;k:real;num:no;score:s;beg
好像你这个程序不是“输入2个数,求最大和最小值”啊,而是输入5组数,每组两个,分别是“编号”,“成绩”然后求出总成绩吧,但是求出来却又没有输出,即没有“writeln(k)”,搞不懂到底是干什么的
program 输入2个数,求最大和最小值;｛程序标题｝
const ｛常量定义区｝
n=5;{定义常量n=5}
type｛类型定义区｝
no=array[1..n] of integer;｛定义类型no为范围是1..n的整型数组｝
s=array[1..n] of real;｛定义类型s为范围是1..n的实型数组｝
var｛变量说明区｝
i:integer;｛说明变量i为整型｝
k:real;｛说明变量k为实型｝
num:no;｛说明num为no型（范围是1..n的整型数组）｝
score:s;｛说明score为s型（范围是1..n的实型数组）｝
begin｛程序开始｝
K:=0;｛赋初值为0｝
for i:=1 to n do｛你的怎么是of?应该是for.让i从1开始到n递增,同时下面的语句循环执行n次｝
begin｛复合语句开始,直到end结束.一个begin要配一个end.此处begin,end之间的语句都会被循环执行｝
readln(num[i],score[i]);｛读入两个数据,并将其分别置入num和score的第i个元素｝
k:=k+score[i];｛累加score的元素,即求和｝
end;｛循环结束｝
writeln(num[i],score[i]);｛输出num和score的第i个元素｝
readln;｛按回车键继续,便于查看结果.如果不加这句话,程序运行结束就立即退出,要按Alt+F5才能查看结果｝
end.｛程序结束｝