Uses crt; Var i,t: integer; Begin Clrscr; t:=0; i:=0; t:=t+i; i:=i+1; Begin Readln; Write('tong các so chan nho hon 50 la',t); End; End. A)if mod 2=0 then B)while i
Cập nhật ảnh bìa
Tải lên
Từ máy tính của bạn
Cập nhật ảnh đại diện
Tải lên
Từ máy tính của bạn
Học tại trường
Chưa có thông tin
Đến từ
Chưa có thông tin , Chưa có thông tin
Số lượng câu hỏi
2
Số lượng câu trả lời
1
Điểm GP
0
Điểm SP
0