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

270

Top 1000 câu hỏi thường gặp môn Tin học có đáp án (phần 1) hay nhất được biên soạn và chọn lọc giúp bạn ôn luyện và đạt kết quả cao trong bài thi môn Tin học.

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 46: 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.

 

Từ khóa :
Giải bài tập
Đánh giá

0

0 đánh giá