Tin học pascal

[ĐT.ChâuGiang]

[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.

viết phương trình tính tổng các số chẵn từ 1 đến 100

 

[trà nguyễn hữu nghĩa]

viết phương trình tính tổng các số chẵn từ 1 đến 100

Mình chỉ làm phần chính thôi nha

......khai  báo và nhập dữ liệu
i := 1;
tong := 0;
while i <= 100 do
begin
i := i * 2;
tong := tong + i;
end;
write(tong);