Pascal - Sử dụng Procedure viết chương trình tính n!

Pascal - Sử dụng Procedure viết chương trình tính n!

Viết chương trình tính n! với yêu cầu sử dụng hàm để tính giai thừa

>> Pascal - Tìm số lớn thứ nhì trong n số được nhập từ bàn phím

>> Pascal - Viết CT cho phép nhập hai số vào hai biến, đổi giá trị của hai biến cho nhau

Mã chương trình

Program Giai_thua_Ham;

uses crt;

var n: longint;

Function Giai_Thua(n:longint):longint;

Var GT:Longint;

begin

     GT:=1;

     while n > 0 do

     begin

     GT:=GT * n;

     n:=n-1;

     end;

     Giai_thua:=GT;

end;

begin

    clrscr;

    write('Nhap n: '); readln(n);

    write(n,'!=',Giai_thua(n));

    readln

end.

Nhận xét:

Hãy so sánh sự khác nhau khi Giai_thua được viết dưới hai dạng Function và Procedure.

- Khi dùng Procedure cần một biến (toàn cục) để lưu giữa giá trị của n!. Biến này được truyền cho tham biến trong Procedure. Sau khi gọi nó cần lệnh để in n!

- Khi dùng Function, có thể sử dụng nó như là một biểu thức.

Bạn thấy bài viết này như thế nào?: 
Average: 3.7 (11 votes)
Ảnh của Tommy Tran

Tommy owner Express Magazine

Drupal Developer having 9+ year experience, implementation and having strong knowledge of technical specifications, workflow development. Ability to perform effectively and efficiently in team and individually. Always enthusiastic and interseted to study new technologies

  • Skype ID: tthanhthuy

Advertisement

 

jobsora

Dich vu khu trung tphcm

Dich vu diet chuot tphcm

Dich vu diet con trung

Quảng Cáo Bài Viết

 
Quá đơn giản với Upgrade Status for Drupal 8 trên phiên bản Drupal 9

Quá đơn giản với Upgrade Status for Drupal 8 trên phiên bản Drupal 9

First beta of Upgrade Status for Drupal 8 out with highly improved reporting, helps to best collaborate with project maintainers

Hướng dẫn đổi ảnh đại diện Facebook hưởng ứng ngày trái đất

Hướng dẫn đổi ảnh đại diện Facebook hưởng ứng ngày trái đất

Ngày 22/04 hằng năm được chọn làm ngày trái đất nhằm vận động mọi người nâng cao nhận thức và hành động nhằm bảo vệ giá trị của môi trường tự nhiên.

Tên miền .xxx của hàng loạt website lớn nhất Việt Nam đã bị đầu cơ

Tên miền .xxx của hàng loạt website lớn nhất Việt Nam đã bị đầu cơ

Dù có giá cao gấp 10 lần tên miền. com, tên miền "người lớn" của hàng loạt các báo điện tử, doanh nghiệp, trang thương mại điện tử lớn nhất tại Việt Nam

Tomdesgin.vn

 

Drupal Services