1. Trang chủ
  2. » Hoá học lớp 12

2020)

2 3 0

Đang tải... (xem toàn văn)

THÔNG TIN TÀI LIỆU

Thông tin cơ bản

Định dạng
Số trang 2
Dung lượng 11,51 KB

Nội dung

[r]

(1)

MÔN TIN HỌC LỚP 8 program Tinh_tong; uses crt;

var S, n: integer; begin

clrscr;

writeln ('Tinh tong 200 so dau tien: S = + + + + 200'); S := 0; n := 1;

while n <= 200

begin S := S + n; n := n + 1; end; writeln ('Tong 200 so dau tien la = ',S); readln;

end

MÔN TIN HỌC 8 program Tinh_tong; uses crt;

var S, n: integer; begin

clrscr;

writeln ('Tinh tong 300 so dau tien: S = + + + + 300'); S := 0; n := 1;

while n <= 300

(2)

Ngày đăng: 07/02/2021, 00:21

w