free Pascal的程式題

2022-12-24 11:41:16 字數 493 閱讀 4190

1樓:匿名使用者

vari,max,min,sum:longint; //max,min 為最大,最小值,sum是平均值

a:array [1..20] of longint;//要讀入的20個數

begin

sum:=0;

max:=-maxlongint;min:=maxlongint; //數值初始化,maxlongint是系統定的最大longint值,約21億

for i:=1 to 20 do

begin

read(a[i]);//讀入20個數

sum:=sum+a[i];//求出總的和

if maxa[i] then min:=a[i];//找出最大,最小值

end;

writeln(max);

writeln(min);

writeln(sum/20);輸出答案。。。。

end.

明白了嗎?

free pascal的基本語句,賦值

迴圈語句 for語句 for 控制變數 表示式1 to 表示式2 do 語句 遞增型迴圈。for 控制變數 表示式1 downto 表示式2 do 語句 遞減型迴圈。for 語句說明。1 迴圈變數必須是順序型別。例如,可以是整型 字元型等,但不能是實型。2 迴圈變數的值遞增或遞減的規律是 選用to則...

C語言程式題,c語言程式題

int f int x 這裡是函式的宣告,c語言中函式必須先宣告後呼叫,因為在main方法中呼叫了這個函式,函式的定義在main方法下面,所以必須宣告在main方法開頭。int f int x 是一個函式,這函式在main函式之前有宣告的,宣告之後,就可以在main函式中呼叫。int f int x...

c程式題求助大神,謝謝,c程式題求助大神,謝謝

實驗結果還用說嗎bai?輸入學號姓 du名年齡,輸出學生基zhi本資訊 學號dao姓名年齡專。類外定義成員函式 屬類內宣告 void init void disp 類外定義類成員函式 void student init void student disp c 程式設計題,求大神寫一下 謝謝 incl...