Viết chương trình sử dụng lệnh for-do hoặc while…do S= 1+2+3+4+…+2019

Viết chương trình sử dụng lệnh for….do hoặc while…do S= 1+2+3+4+…+2019

0 bình luận về “Viết chương trình sử dụng lệnh for-do hoặc while…do S= 1+2+3+4+…+2019”

  1. var i,S : integer;

    begin

    S:=0;

    for i:=1 to 2019 do S:=S+i;

    readln

    end.

    var i,S : integer;

    begin

    S:=0;

    i:=1;

    while i<=2019 do

    begin

    S:=S+i;

    i:=i+1;

    end;

    readln

    end.

    Bình luận

Viết một bình luận