Học Pascal/Hàm Pascal

Hàm Pascal

Hàm Pascal là một tập hợp của nhiều dòng lệnh từ các lệnh mặc định để thực thi một việc. Việc thực hiện hàm luôn trả về giá trị két quả thuộc kiểu xác định và giá trị đó được gán cho tên hàm.

Cấu Trúc

Function <tên hàm>[(<danh sách tham số>)]:<kiểu dữ liệu>;
[<phần khai báo>]
Begin
  [<dãy các lệnh>]
end;

Trong đó:

<danh sách tham số> có thể có hoặc không
[<phần khai báo>] dùng để xác định các hằng, kiểu, biến và cũng có thể xác định các chương trình con khác được sử dụng trong hàm.

Thí Dụ

Chương trình

Giải

Program Số_nhỏ_nhất;
Var a, b, c:real;
Function Min(a, b:real):real;
  begin
    if a<b then Min:=a else Min:=b;
  end;
Begin
  write('Nhập a, b, c: ');
  readln(a,b,c);
  writeln('Số nhỏ nhất là: ', Min(Min(a,b),c));
  readln
End.

Nhập a, b, c: 1 9 5
Ta có: 1<9 → a<b → Min(a,b)=a=1
Mặt khác: 1<5→ Min(a,b)<c → Min(Min(a,b),c)=Min(a,b)=a=1
Số nhỏ nhất là: 1

Nhập a, b, c: 5 5 3
Ta có: 5=5 → a=b → Min(a,b)=b=5
Ta lại có: 5>3 → Min(a,b)>c → Min(Min(a,b),c)=c=3
Số nhỏ nhất là: 3