Tin học Viết chương trình trên pascal

[Team2k2]

[TẶNG BẠN] TRỌN BỘ Bí kíp học tốt 08 môn
Chắc suất Đại học top - Giữ chỗ ngay!!

ĐĂNG BÀI NGAY để cùng trao đổi với các thành viên siêu nhiệt tình & dễ thương trên diễn đàn.

Tính tổng các số lẻ từ 1 đến 100.
1+3+5+...+99.

 

[ka1412]

for i:=1 to 100 do
if i mod 2 <> 0 then s:=s+i;

Mình chỉ viết phần chính thoi nha =)