ai giỏi pascal giúp em với!

D

diamond_jelly95

suny94 said:
Bài tập về mảng một chiều:
Tính tổng của mảng gồm N phần tử, và đếm xem có bao nhiêu số chẵn, bao nhiêu số lẻ.

Em cảm ơn nhiều:D
Bấm để xem đầy đủ nội dung ...
s:=0;i:=1;
For i:=1 to n do
begin
s:=s + a;
i:=i+1;
end;
a=0;b=0;
For i:=1 to n do
if a mod 2=0 then a:=a+1
else b:=b+1;
Write(' tg là:', s);Writeln (' tg số chẵn:', a);
Writeln('tg số lẻ:',b);
cái kết luận ko biết đúng ko
lâu ko học quên mất tiêu rồi:D:D
 
Last edited by a moderator:
You must log in or register to reply here.
Top Bottom