1樓：網友
var a:array['a'..e',1..4,boolean]of real
相當於。var a:array['a'..e'] ofarray[1..4] of
array[boolean] of reala['a',3] 相當於 a['a'][3]所以 a['a',3] 是 b，乙個陣列，該陣列具有兩個實型陣列元素。
答案】 b
關於陣列問題，這道題怎麼解釋啊？？答案是
2樓：網友
1全部a[0]的值要++，必須滿足乙個條件就是：b>a[1]。
b是陣列b中的值，a[1]=5.
b陣列裡大於5的值只有3個，9,8,7。
所以a[0]++被執行三次。
結果自然就是3
3樓：網友
解釋如下：
insert函式的意思是：當b的值大於a[1]的值（5）時，將b的值插入到陣列a中去，每加入乙個b的值，a[0]做一次計數。
main函式中。
for(i=0;i<9;i++)
insert(a,b[i]);
的意思是，將陣列b的9個元素依次比較，插入陣列a中。
而陣列b中大於5的值有｛9，8，7｝三個，所以a[0]的值就是3所以輸出值為3.
4樓：網友
intsert()中將a[1]與b比較，只有當b＞a[1]的時候才會執行if操作，b中只有9，8，7比a[1]大，所以if操作只執行了3次，if操作中a[0]++執行3次自增，所以a[0]值是3。
還不理解的話你可以試試在b[9]中改變一些比5小的數字成比5大的數字，這樣a[0]的值就會變大，把一些比5大的數字改成比5小的數字，a[0]值就會變小。
一道pascal陣列題
5樓：憶可棠
var hash,a:array [0..40000] of longint;
n,i,num,max,max1:longint;
beginreadln(n);
max:=0;
fillchar(a,sizeof(a),0);
fillchar(hash,sizeof(hash),0);
for i:=1 to n do
beginread(a[i]);
if a[i]>max then max:=a[i];
end; readln;
for i:=1 to n do
hash[a[i]]:hash[a[i]]+1;
max1:=0;
for i:=1 to max do
if hash[i]>max1 then num:=i;
writeln(num);
end. 如果有出現次數都是最多的數，那麼只輸出乙個最小的數，我是按照整型的大小開的陣列，如果要再大，就自己再開。
array [boolean] of integer
6樓：網友
以布林御銷擾型宣告乙個整型數鎮旦組。
這個陣列中只有2個值。
比如鬥巨集說 var a:array[boolean] of integer;
那麼取值只能夠取a[true]和a[false]就相當於var a:array[0..1] of integer;
兩道pascal陣列題
7樓：網友
題1 var st:string;
a:array[1..10] of char;
j,i,l,k:integer;
ch:char;
beginreadln(st);
l:=length(st);
for i:=1 to l do
a[i]:=st[i];
k:=l;for i:=1 to l-1 do beginfor j:=1 to k-1 do
if a[j]>a[j+1] then beginch:=a[j];
a[j]:=a[j+1];
a[j+1]:=ch;
end; k:=k-1;
end; for i:=1 to l do write(a[i]);writeln;
for i:=l downto 1 do write(a[i]);writeln;
end. 題2 有問題 原始數只能為4位數 且4數不能重複。
改後程式如下。
var z,t,n,i,j,s:integer;
x:string;
a,b:array[1..4]of integer;
beginreadln(n);
str(n,x);
for i:=1 to 4 do
a[i]:=ord(x[i])-48;
s:=0;repeat
for i:=1 to 4 do
for j:=1 to 3 do
if a[j]a[j]:=a[j+1];
a[j+1]:=t;
end; for i:=1 to 4 dob[i]:=a[5-i];
for i:=1 to 4 do
a[i]:=a[i]-b[i];
for i:=4 downto 1 do
if a[i]<0 then begin
a[i]:=a[i]+ 10;
a[i-1]:=a[i-1]-1;
end; z:=0;
for i:=1 to 4 do z:=z*10+a[i];
s:=s+1;
until z=6174;
writeln(s);
end.
8樓：我的偶像是周瑜
我們要的是分，給0蛋的就不要白費唇舌了。
9樓：憶可棠
請問什麼叫"最整大數"啊。
pascal陣列問題
10樓：網友
先判斷它是不是1，如果不是，再執行「語句」讓它移動，否則不移動。
語句」應該先把陣列全部 清零，再把需要的位置設為1
背影的練習題10道，有答案，背影的練習題10道，有答案
一 基礎部分 1 下邊加粗字注音全部正確的一項是 a 瑣屑 xi 簌簌 s 62616964757a686964616fe4b893e5b19e31333236373262 行李 x n 頗 p b 喪事 s n 賦閒 f 揀定 ji n 迂 y c 妥帖 ti 典質 zh 柵欄 sh n 攀 b ...
求因式分解的練習題，求因式分解練習題20道
x 2 2xy y 2 9 a 2 2ab b 2 c 2 x 2 y 2 6y 9 1 m 2 n 2 2mn p q k p q 4a 2 12ab 9b 2 25 4a 2 4a 1 2ab b 4a 2 20ab 25b 2 36 好累啊，全是手打的，多跟點分吧！您好，很高興為您解答。可以把...
這是我自己出的一道基爾霍夫定律的練習題。請懂行的朋友看看我算的對不對
第一個式子的後兩項符號反了 按照你所標的電流參考方向，迴路電壓都取順時針方向，第二個方程應該是 e2 i2r2 i3r3 0 基爾霍夫定律練習題 您好，我看到您的問題很久沒有人來回答，但是問題過期無人回答會被 扣內分的並且你的懸賞容分也會被沒收！所以我給你提幾條建議 一，你可以選擇在正確的分類下去提...