Bài 5. Từ bài toán đến chương trình

Hadomi Do

viết chương trình while do tổng các số tự nhiên lẻ S=0+3+5+7+9...sao cho S ≥ 2000

Phía sau một cô gái
16 tháng 3 2023 lúc 15:00

program TongSoLe;

var

      i, S: integer;

begin

      i := 1;

      S := 0;

      while S < 2000 do

      begin

            S := S + i;

            i := i + 2;

      end;

      writeln('Tong cac so tu nhien le la: ', S);

      readln;

end.

Bình luận (0)

Các câu hỏi tương tự
Lê Trần Bội Bội
Xem chi tiết
Lê Trần Bội Bội
Xem chi tiết
Ngáo Ngơ Alice
Xem chi tiết
Tuấn Kiệt Phạm
Xem chi tiết
nhattien nguyen
Xem chi tiết
nhattien nguyen
Xem chi tiết
Alice
Xem chi tiết
Hoài Thương
Xem chi tiết
Yến Nhi Nhi
Xem chi tiết