Hãy nhập câu hỏi của bạn vào đây, nếu là tài khoản VIP, bạn sẽ được ưu tiên trả lời.
LƯU Ý
Các bạn học sinh KHÔNG NÊN đăng các câu hỏi không liên quan đến nội dung học tập, hoặc những nội dung linh tinh gây nhiễu diễn đàn..nha
thi ban co nho lai mat khau la j , ban nho xem ban co doi mat khau ko
mik gõ r mà mik chắc chắc 100% mật khẩu đó đúng . À mà mik lấy nick em mik vào trang của mik thì nó để là Nick đã bị đổi chủ! !
@buithianhtho,@HISINOMA KINIMADO,@Vy Lan Lê,@Phạm Hoàng Lê Nguyên,...CTV khác nx,...ko làm đc thì phải đạp đổ.
Muốn nổi rồi!ko có ý phá hay j cả!!!
Var i,n,s:integer;
begin
readln(n); s:=0;
for i:=1 to n do
if i mod 2 = 0 then s:=s+i;
writeln('tong so chan', s);
readln;
end.
uses crt;
var n,i,s,dem:integer;
begin
clrscr;
write('nhap n:');readln(n);
s:=0; dem:=0; i:=0;
while dem<=n do
begin
if i mod 2 =0 then
begin
s:=s+i;
dem:=dem+1;
i:=i+1;
end
else i:=i+1;
end;
write(s);
readln;
end.
bạn phải viết 3 dòng trả lời
ng trên 10 sp k thì bạn đc 1 điểm
bạn tl câu hỏi của mik mik k cho bạn rồi bạn k hai câu mik tl
ok hôm
HT
đc hơm mấy bn