logo

Viết chương trình pascal tìm số lớn nhất và nhỏ nhất

icon_facebook

Các bài tập viết chương trình tìm giá trị nhỏ nhất, giá trị lớn nhất.

1. Viết chương trình tìm giá trị nhỏ nhất trong 4 số a, b, c, d (a, b, c, được nhập từ bàn phím).

[CHUẨN NHẤT] Viết chương trình pascal tìm số lớn nhất và nhỏ nhất

2. Viết chương trình tìm giá trị lớn nhất trong 4 số a, b, c, d (a, b, c, được nhập từ bàn phím).

[CHUẨN NHẤT] Viết chương trình pascal tìm số lớn nhất và nhỏ nhất (ảnh 2)

3. Viết chương trình tìm giá trị lớn nhất, nhỏ nhất trong 4 số a, b, c, d.

1

2

3

4

5

6

7

8

9

10

11

12

13

14

15

16

17

18

Program Max_Min;

Uses crt;

Var a,b,c,d:integer;

    max,min:integer;

Begin

clrscr;

   write('nhap so thu nhat :'); readln(a);

   max:=a;   min:=a;

   write('nhap so thu hai :');  readln(b);

   ifmax<b>b thenmin:=b;

   write('nhap so thu ba :');   readln(c);

   ifmaxc then min:=c;

   write('nhap so thu tu :');   readln(d);

   ifmaxd then min:=d;

   writeln('So lon nhat la :',max);

   writeln('So nho nhat la :',min);

readln;

End.</b>

4. Viết chương trình nhập vào một dãy số nguyên có n phần tử. In ra màn hình phần tử nhỏ nhất, phần tử lớn nhất và giá trị trung bình của danh sách ra màn hình

[CHUẨN NHẤT] Viết chương trình pascal tìm số lớn nhất và nhỏ nhất (ảnh 3)

Các dạng câu lệnh trong chương trình Pascal 

1. Câu lệnh if…then…

Nếu <Điều Kiện> thì <Câu lệnh>

If <Điều kiện> then <Câu lệnh>

Nếu điều kiện true thì biểu thức sẽ được thực hiện, còn nếu điều kiện false thì biểu thức sẽ không được thực hiện.

Câu lệnh if… then…. được dùng trong trường hợp để so sánh các phép toán hoặc các phép toán có điều kiện.

Ví dụ: So sánh hai số a, b

Nếu a>b thì in số a ra màn hình 

If a>0 then writeln (‘a la so lon hon’);

2. Câu lệnh for…do…

Câu lệnh for…do…. nghĩa là lặp với số lần biết trước, nếu ta biết được số lần lặp lại của một dãy số, một tổng,… thì ta sẽ sử dụng for…do….

For <biến>:= <giá trị đầu> to <giá trị cuối> do <câu lệnh>

Trong đó: 

  • Biến có kiểu số nguyên integer
  • Giá trị cuối phải lớn hơn giá trị đầu và là kiểu số nguyên.
  • Câu lệnh có thể là câu lệnh đơn (một lệnh) hay lệnh ghép (nhiều lệnh)

Ví dụ: Tính tổng từ 1 tới 10 bằng Pascal

[CHUẨN NHẤT] Viết chương trình pascal tìm số lớn nhất và nhỏ nhất (ảnh 4)

3. Câu lệnh while…do…

Câu lệnh while… do… nghĩa là lặp với số lần chưa biết trước và phụ thuộc vào một điều kiện cụ thể và chỉ dừng lại khi điều kiện đó sai.

Ví dụ: Tính S là tổng các số tự nhiên sao cho số S nhỏ nhất để S > 1000

[CHUẨN NHẤT] Viết chương trình pascal tìm số lớn nhất và nhỏ nhất (ảnh 5)

Trong Pascal câu lệnh lặp với số lần chưa biết trước là: 

while <điều kiện> do <câu lệnh>;

icon-date
Xuất bản : 09/11/2021 - Cập nhật : 13/07/2024

Câu hỏi thường gặp

Đánh giá độ hữu ích của bài viết

😓 Thất vọng
🙁 Không hữu ích
😐 Bình thường
🙂 Hữu ích
🤩 Rất hữu ích
image ads