Lập Trình Pascal: Tính Tổng Các Số Chẵn Giữa Hai Số - Bài Kiểm Tra

Bài Kiểm Tra © 2020 Bài Kiểm Tra.com. All Rights Reserved. logo 1
  • Trang nhất
  • Tin học
Thứ tư, 17/12/2025, 16:14 Lập trình Pascal: Tính tổng các số chẵn giữa hai số 2020-04-20T11:42:20+07:00 Hướng dẫn lập trình Pascal: Nhập vào 2 số nguyên a và b (giả sử a<b). Tính và đưa ra màn hình tổng của tất cả các số chẵn không lớn hơn b và không nhỏ hơn a. Lập trình Pascal, tính tổng số chẵn https://baikiemtra.com/uploads/news/2019_11/bai-tap-lap-trinh-pascal.jpg Bài Kiểm Tra Thứ hai - 20/04/2020 11:04
  • In ra
Hướng dẫn lập trình Pascal: Nhập vào 2 số nguyên a và b (giả sử a<b). Tính và đưa ra màn hình tổng của tất cả các số chẵn không lớn hơn b và không nhỏ hơn a. Input: a, b (a<b) Output: Tổng của tất cả các số chẵn không lớn hơn b và không nhỏ hơn a. Thuật toán: B1: Nhập hai số nguyên a, b (a<b) B2: S ← 0; i:=a; B3: Nếu i mod 2 = 0 thì S := S + i; i:= i + 1; B4: Nếu i<=b thì quay lại B3 B5: Viết ra màn hình tổng S, kết thúc. Mô phỏng thuật toán với a = 2; b =6
i i<=b i mod 2 = 0 S
2 T T 2
3 T F 2
4 T T 6
5 T F 6
6 T T 12
7 F
Cách 1: Dùng vòng lặp While Program TongSoChan; Uses crt; Var a,b, S, i: integer; Begin Clrscr; Writeln('CHUONG TRINH TINH TONG CAC SO CHAN GIUA A VA B'); Write('Nhap vao so a: '); readln(a); Write('Nhap vao so b: '); readln(b); S:=0; i:=a; while i<=b do Begin If i mod 2 = 0 then S:=S+i; i:=i+1; End; Writeln('Tong cac so chan giua ',a,' va ',b,' la: ', S); Readln; End. Cách 2: Dùng vòng lặp For Program TongSoChan; Uses crt; Var a,b, S, i: integer; Begin Clrscr; Writeln('CHUONG TRINH TINH TONG CAC SO CHAN GIUA A VA B'); Write('Nhap vao so a: '); readln(a); Write('Nhap vao so b: '); readln(b); S:=0; For i:=a to b do If i mod 2 = 0 then S:=S+i; Writeln('Tong cac so chan giua ',a,' va ',b,' la: ', S); Readln; End.

Ý kiến bạn đọc

Sắp xếp theo bình luận mới Sắp xếp theo bình luận cũ Sắp xếp theo số lượt thích

Theo dòng sự kiện

    /uploads/bai-kiem-tra.jpg Nghị luận về một câu tục ngữ hoặc danh ngôn về một vấn đề đời sống

    /uploads/bai-kiem-tra.jpg Đề thi học kì 2 Hoạt động trải nghiệm 7 sách Chân trời năm 2024

Xem tiếp...

Những tin cũ hơn

    /assets/news/2019_11/bai-tap-lap-trinh-pascal.jpg Lập trình Pascal: Viết chương trình nhập vào một file số nguyên và in ra

    /assets/news/2019_11/bai-tap-lap-trinh-pascal.jpg Lập trình Pascal: Tính tổng các ước lẻ của một số

GIẢI BÀI TẬP
Lớp 1 Lớp 2 Lớp 3 Lớp 4 Lớp 5
Lớp 6 Lớp 7 Lớp 8 Lớp 9
Lớp 10 Lớp 11 Lớp 12
Bài học Bài soạn Bài giảng
Bài giới thiệu Bài hướng dẫn
Bài làm văn Bài trắc nghiệm
Kiểm tra 15P Kiểm tra 1 tiết
Kiểm tra HK1 Kiểm tra HK2
Thi vào lớp 10 Tốt nghiệp THPT
BÀI LUYỆN THI
Lớp 1 Lớp 2 Lớp 3 Lớp 4 Lớp 5
Lớp 6 Lớp 7 Lớp 8 Lớp 9
Lớp 10 Lớp 11 Lớp 12
Kiểm tra 15 phút Kiểm tra 1 tiết
Kiểm tra học kì 1 Kiểm tra học kì 2
Luyện thi theo Bài học
Luyện thi THPT Quốc Gia
THÀNH VIÊN Hãy đăng nhập thành viên để trải nghiệm đầy đủ các tiện ích trên site Nhập mã do ứng dụng xác thực cung cấp Thử cách khác Nhập một trong các mã dự phòng bạn đã nhận được. Thử cách khác Đăng nhập Đăng ký © 2020 Bàikiểmtra.com. All Rights Reserved. Bạn đã không sử dụng Site, Bấm vào đây để duy trì trạng thái đăng nhập. Thời gian chờ: 60 giây cron

Từ khóa » Các Bài Toán Tính Tổng Trong Pascal