Tính tổng các số chẵn từ 1 đến 100 rồi in kết quả ra màn hình

1.1 K

Tailieumoi.vn biên soạn và giới thiệu bộ câu hỏi Tin học gồm các kiến thức lý thuyết và thực hành, giúp học sinh ôn tập và bổ sung kiến thức cũng như hoàn thành tốt các bài kiểm tra môn Tin học. Mời các bạn đón xem:

Tính tổng các số chẵn từ 1 đến 100 rồi in kết quả ra màn hình

Câu 47: Tính tổng các số chẵn từ 1 đến 100 rồi in kết quả ra màn hình.

Lời giải:

Program TinhTongCacSoChanTu1den100_Cach1;

Var i, tong: integer;  

BEGIN

    writeln('Chuong trinh tinh tong cac so chan trong khoang tu 1 -> 100');

    readln;

    tong: = 0;

    for i:=1 to 100 do

        if i div 2 = 0 then tong:= tong + i;

   writeln('Tong cua cac so chan trong khoang tu 1 -> 100 bang: ',tong:4);

    readln;

END.

Đánh giá

0

0 đánh giá