pascal：資料統計
1樓：網友
這是noip的一道或襲閉水題，用衫裂快排禪戚就可以了，**如下：
program tongjishuzi;
var a:array[1..200000]of int64;
t,n:longint;
procedure qsort(l,r:longint);
var t,m,n:longint;
k,c:int64;
beginm:=l;
n:=r;k:=a[(l+r)div 2];
repeat
while a[m]k do dec(n);
if m<=n then
beginc:=a[m];
a[m]:=a[n];
a[n]:=c;
inc(m);
dec(n);
end;until m>n;
if ml then qsort(l,n);
end;procedure output;
var t:longint;
j,k:int64;
begink:=a[1];
j:=0;for t:=1 to n doif a[t]=k then inc(j)elsebegin
writeln(k,' j);
k:=a[t];
j:=1;end;
writeln(k,' j);
end;begin
readln(n);
for t:=1 to n do
read(a[t]);
qsort(1,n);
output;
end.
用pascal計算題目
2樓：t1nyperson丶
那不是省略號，-
樓主你只要打兩個英文句號(或者說是小數點)" .."就行了。
用pascal計算a+b的和！急！急！
3樓：網友
用int64資料型別處理大資料。。。
program ab;
vara,b:int64;
beginreadln(a,b);
a:=a+b;
writeln(a);
end.
pascal中如何計算記憶體
4樓：網友
為1000000*longint(4位元組)=1000*1000*4
所以，約為4m上限現在是20m左右。
如果是integer的話是2位元組，也就是2m
5樓：網友
陣列的大小1000000*元素的大小sizeof(longint)=4就可以了，在turbo pascal中是不能申請這麼大的陣列的，在free pascal中longint是4位元組還是8位元組我就不知道了。
pascal數的統計
6樓：網友
var:a,b,c:longint;
s:string;
beginreadln(a);
c:=0;for b:=9 to a do beginstr(b,s);
if pos('0',s)<>0 then c:=c+1;
end;writeln(c);
end./空行為讀寫檔案留。
7樓：
如果說問有多少個0反而還會做。問多少個數有0反而不會做了t t..
看看有沒有高人。
不行就只能像樓上那樣暴力拿70了。
統計以？結束的串（pascal）
8樓：聽不清啊
程式沒有大的問題只是不能識別大寫字母（下面已作修改），執行正常：
varch:char;
tot1,tot2,tot3:longint;
beginread(ch);
tot1:=0;
tot2:=0;
tot3:=0;
while ch<>'?' do
beginif (ch>='a')and(ch<='z')or(ch>='a')and(ch<='z') then tot1:=tot1+1
else if (ch>='0')and(ch<='9') then tot2:=tot2+1
else tot3:=tot3+1;
read(ch);
end;writeln(tot1);
writeln(tot2);
writeln(tot3);
end.
9樓：網友
可能是你輸入的資料才大了。
應該沒問題啊。。。
pascal統計大寫英文本母的個數
var ch char s,j,i integer begin read ch while ch do begin if ch a and ch z then s s 1 read ch end readln writeln s end.話說我就是回答你另乙個問題的人，我把那個問題裡的程式複製過來，...
pascal布林型別的使用
孤獨我不喜歡 布林型 boolean 是一種資料的型別，這種型別只有兩種值，即 真 與 假 1 布林常量 在pascal語言中 真 用ture表示，假 用false表示。所以布林型別只有true與false兩個常量。2 布林變數 boolean 如果我們將某些變數說明成布林型，那麼這些變數就是布林變...
sum統計函式必須使用groupby嗎
假設有一張學生成績表，該表有四個欄位。creater table t id int,name varchar 20 bit,score int 那如果你只想獲得所有人的成績 score 則直接 select sum score from t即可。但是，如果你想知道所有男生或者女生的成績，則 sele...