急pascal題目!哪位高手能解這幾道難題呀

時間 2022-05-16 22:35:02

1樓:陶梓絮

我不寫程式,給一個思路,寫也只寫核心程式

1.read(c);

while c<>'.' do beginif ((c>='a')and(c<='z'))or((c>='a')and(c<='z')) then inc(i);

if (c>='0')and(c<='9') then inc(j);

read(c);

end;

最後比較i和j,i表示字母個數,j表示數字個數2.暴力搜尋,你a-i都做1-9列舉。最後判重、判條件,條件對就輸出3.

題目什麼意思,讀入一串整數還要統計整數個數?是統計正整數個數麼?

read(i);

while i<>9999 do beginif i>0 then inc(ans);

read(i);

end;

writeln(ans);

沒有存連結串列

核心程式都給你了還什麼不滿意的。不會做還問什麼題目

2樓:匿名使用者

第一題var s:string;

a,b,i:integer;

begin

readln(s);

for i:=1 to length(s) dobegin

if (s[i]>='a')and(s[i]<='z')or (s[i]>='a')and(s[i]<='z') then a:=a+1;

if (s[i]>='0')and(s[i]<='9')then b:=b+1;

end;

if a>b then write('yes') else write('no');

end.

哪位高手能解答這道題,有哪位高手能幫我解答一道數學題

這道題中買東西一共用去的錢可以相加,也就是總計 而每次剩餘的錢卻不能總計。例如我有10元錢,買練習本用去5元,剩餘5元,買尺子又用去4元,剩餘1元,再買橡皮用去1元,剩餘0元。按上面的邏輯得到 買東西用去的錢總計5 4 1 10 元 而每次剩餘的錢總計5 1 0 6 元 這顯然是不對的。 這樣的邏輯...

哪位高手幫我翻譯下,急,謝謝,哪位高手幫我翻譯下,急,謝謝

dandongnewelectrical and mechanical engineering co.ltd.liaoningdandong harbor industrial parkinstruments industry basewen qingroad no.70 37buildingon ...

哪位高手能解決這兩道生物題,叩謝

氣體經肺進入氣囊後,再從氣囊經肺排出,由於氣囊的擴大和收縮,氣體兩次在肺部進行氣體交換。這種在吸氣和呼氣時都能在肺部進行氣體交換的呼吸方式,稱為雙重呼吸。是鳥類特殊呼吸方式。d.羽毛裡面,含有大量的空氣,空氣導熱性差,空氣包在身體上,就可以防止體溫散發。不知道選b是否嚴密。如果不對就選d吧 生物和和...