1樓：匿名使用者
你這個程式各種錯啊好不好……
x是**來的？for後面沒有語句？而且突然插入begin和end鬧哪樣？
說實話我完全看不懂你的程式想要幹什麼了= =重寫吧……還是我幫你寫乙個？
vari,j,n:longint;
begin
readln(n);
for i:=1 to n do
begin
readln(j);
writeln(j and 1);
end;
end.
2樓：匿名使用者
begin
for i:=1 to n do
end;
if(a[x] mod 2=0)then
writeln('0')
else
writeln('1');
==〉for i:=1 to n do
begin
if(a[x] mod 2=0)then
writeln('0')
else
writeln('1');
end;
3樓：
x你沒定義啊！還有 第一for你這樣寫只有一條語句read(i)是屬於它的啊。下面的begin end真心看不懂，為什麼你要放入這個，你想說明什麼？
如果你想讓第二個for屬於第乙個for你就該把
begin
read(i);
for i:=1 to n;
end;
如果不是...估計你還沒搞懂pascal的語法。先看看語法格式吧！
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輸入整數n（1《n，pascal輸入乙個整數N（1 N 10000000），把它的各位數字倒序輸出。N末尾的零不要輸出。
何老師 答疑 問題的關鍵是處理末尾的0，程式如下 輸入乙個正整數，將其逆序輸出，每個數字後有乙個空格。輸入乙個正整數n，可以假設n在int範圍內輸出將n按其逆序輸出，每個數字後有乙個空格，輸出佔一行。include int main int i int n scanf d n int num 0 f...
excel輸入N個數字就算出N個數字的平均值，比如輸入數就算這數的平均值，就的平均值
薛洋的偶像魏無羨 不知道你用的是哪個版本的excel，但是在工具欄裡都有求平均值的選項的，你找一下就ok了，挺簡單的 怎麼在excel中判斷一列數字個數小於5,如果小於等於5怎求這幾個數的算術平均值, if a1 12,a1 0.7,if a1 5,a1 0.8,if a1 3,a1 0.9,a1 ...