*

Bạn đang xem: Hàm lấy phần nguyên trong pascal

*
*
*
*
*
*
*
*
*
*
*
*
*

Giới Thiệu
Tổ CMThủ Tục Hành Chính
Học Hành
Dạy học tập Online
Tư Vấn Thi trung học phổ thông Q.Gia
Môn từ bỏ Nhiên
Môn làng Hội
Nghiên cứu giúp Khoa Học
Điểm kiểm tra thường xuyên
Đề Thi Tham Khảo
Tổ siêng Môn
Đảng Bộ
TT đơn vị Trường

Xem thêm:

Chuyên Môn
Văn Bản
Công Đoàn
Đoàn TN
fan gửi câu chữ

*

CÁC THỦ TỤC THÔNG DỤNG Str(x,S) Ðổi quý giá kiểu số X quý phái dạng chuỗi S. Val(S,x,code) Đổi chuỗi S thành sô x.Nêu đổi chuỗi thành công xuất sắc biên Code nhận cực hiếm 0. Nêu không thay đổi đc,code là sô nguyên đến biêt vtrí gây lỗi. INC(x,r) đội giá trị của x bắt buộc r 1-1 vị. Tương tự với x:=x+r; DEC(x,r) giảm ngay trị của x xuống r solo vị. Tương đương với x:=x-r. (Thủ tục INC(x), DEC(x) xem như tăng, sút x một đơn vị) Insert(S,T,vt); Chèn chuoi S vào chuoi T vtrí vt. Delete(S,P,L) Xoá L cam kết tự từ vtrí p ra khỏi Break ;kết thúc vòng lặp CÁC HÀM THÔNG DỤNG Ord(X) đem thứ tự của ký kết tự X trong bạn dạng mã ASCII. Chr(X) Lấy ký tự trang bị X vào bảng mã ASCII PRED(x) Cho phần tử đứng trước x SUCC(x) cho ra phần tử đứng sau x Round(x) làm cho tròn x Trunc(x) rước phần nguyên Int(x) đem phần nguyên Frac(x) mang phần lẻ ABS(x) lấy giá trị tuyệt vời và hoàn hảo nhất Copy(S,P,L) Trích chuỗi S một chuỗi nhỏ dài L ký kết tự bước đầu từ vtrí p Odd(I:Integer) đến True lúc I là sô lẻ cùng False lúc I là sô chẵn Pos(X,S):Integer cho vtrí ban đầu của chuỗi nhỏ X vào S. Nêu X không thuộc S thì hàm POS đến giá trị 0. A Page A Future



*
13 trang | phân chia sẻ: maiphuongdc | Lượt xem: 22537 | Lượt tải: 4
*

Bạn đang xem câu chữ tài liệu Pascal - hình trạng số nguyên, để thiết lập tài liệu về máy các bạn click vào nút download ở trên
KIỂU SỐ NGUYÊN 6.2.1. Các kiểu số nguyên : Tên hình dạng Phạm vi gía trị Số byte Short
Int -128 .. 127 1 Byte 0..255 1 Integer -32768 .. 32767 2 Word 0 .. 65535 2 Long
Int -2147483648 .. 2147483647 4 Bảng 6.1 kế bên kiểu Integer là thông dụng nhất, các số nguyên còn được chia ra thành 4 kiểu nữa nhé là: Byte, Word, Short
Int và Long
Int. Bảng 6.1 liệt kê chi tiết về thương hiệu gọi, phạm vi gía trị cùng độ nhiều năm tính theo đơn vị chức năng byte của từng hình dạng nguyên. Các biến nguyên chỉ có thể nhận những gía trị là các số nguyên phía trong phạm vi gía trị của biến đó. Khi gán cho một biến một số nguyên nằm ngoài phạm vi của thay đổi thì máy đang báo lỗi: "Const out of range". Ví dụ, mang đến khai báo : Var i : Byte; N : Integer; thì những lệnh đưới đấy là đúng: i:= 200; N:= -1500; còn những lệnh dưới đấy là bị lỗi : i:= -5; N:= 50000; Ðặc biệt tất yêu gán một số thực cho một biến nguyên. Câu lệnh sau là không đúng : N:= 12.5 ; Khi gặp gỡ tình huống này, máy đang báo lỗi "Type mismatch". Chú ý: những số nguyên hệ thập lục phân (hệ 16) được biểu diễn bằng cách viết thêm vệt $ nghỉ ngơi trước số, ví dụ cha số tiếp sau đây : $A , $FF với $10 là những số nguyên viết trong hệ 16. Chúng có gía trị khớp ứng trong hệ 10 là: 10 , 255 với 16 6.2.2. Các phép toán số học tập trên số nguyên: Phép cùng và trừ : ký kết hiệu + với - như thường lệ. Phép nhân : cam kết hiệu bằng dấu *, lấy ví dụ 4*2 mang đến kết qủa là 8. Phép phân tách : ký kết hiệu bằng dấu / , ví dụ 6/4 đến kết qủa là 1.5. Phép phân chia lấy phần nguyên : ký kết hiệu bằng từ khóa DIV. Phép lấy phần dư nguyên của phép chia: ký hiệu bằng từ khóa MOD. Ví dụ: 15 DIV 6 mang lại kết qủa là 2. 15 gian lận 6 cho kết qủa là 3. Các phép toán trên phần nhiều cho kết qủa là các số nguyên, trừ ra phép chia ( / ) luôn luôn cho kết qủa là một trong những thực. Chính vì thế nếu N là một biến nguyên, mà lại gán : N:= 20/5; thì máy sẽ báo lỗi, vị vế phải gồm gía trị thứ hạng thực (=4.0) mặc dù phần lẻ bằng không. Nhấn xét : số nguyên N là chẵn trường hợp N gian lận 2 = 0 (tức N phân tách hết đến 2), ngược lại, là lẻ nếu N hack 2 0. (dấu vào Pascal có nghĩa là khác nhau ). Thứ tự triển khai các phép toán tương tự như thường lệ: các biểu thức vào (...) được xem trước tiên tiếp theo là *, /, div, mod sau cùng là +, - Ðối với những phép toán cùng thứ tự mà lại đứng liền nhau thì phép toán như thế nào đứng trước được gia công trước. Ví dụ: tính biểu thức sau : 15 thủ thuật (2 +4) * 20 div (10 div 4) + 40 hack ( 5* 3) =15 gian lận 6 * đôi mươi div 2 + 40 thủ thuật 15 = 3 * 20 div 2 + 10 = 60 div 2 + 10 = 30 + 10 = 40 lấy một ví dụ sau đó là một ứng dụng của những phép toán div, mod : ví dụ 6.1: Nhập một trong những tiền N đồng, đổi ra coi được bao nhiêu tờ 5 đồng, bao nhiêu tờ 2 đồng, bao nhiêu tờ 1 đồng sao cho tổng số tờ là ít nhất. Lấy một ví dụ N=43 đ = 8 tờ 5 đ + 1 tờ 2 đ + 1 tờ 1 đ. Phương pháp tính như sau : Số tờ 5 đ = 43 div 5 = 8 Số tiền dư = 43 mod 5 = 3 Số tờ 2 đ = Số chi phí dư div 2 = 3 div 2 =1 Số tờ 1 đ = Số chi phí dư mod 2 = 3 hack 2 = 1 Dưới đấy là chương trình rõ ràng : PROGRAM VIDU61; Ðổi chi phí Var N, st5, st2, st1, sodu : Long
Int; Begin Write(‘ Nhap so tien : ’); Readln(N); st5 := N div 5; Sodu := N mod 5; tính phần dư st2 := Sodu div 2; st1 := Sodu mod 2; Writeln(‘ KET QUA DOI TIEN LA: ’ ) ; Writeln(‘ So lớn 5đ= ‘, st5); Writeln(‘ So khổng lồ 2đ= ‘, st2); Writeln(‘ So lớn 1đ=‘, st1); Readln; End. Chạy Chép tập tin nguồn 6.2.3. Những phép toán đối chiếu : ngôn ngữ Pascal bao gồm sáu phép toán đối chiếu được liệt kê vào bảng 6.2 . Ký kết hiệu Ý nghĩa lấy ví dụ như = bằng nhau x=y không giống nhau xy to hơn x>y >= lớn hơn hoặc bằng x>=y Bảng 6.2 Kết qủa của các biểu thức so sánh là 1 gía trị lôgic Ðúng (TRUE) hoặc không nên (FALSE). Ví dụ: Biểu thức 5*2=10 mang đến kết qủa là TRUE. Biểu thức 5+2 7 cho kết qủa là FALSE. Biểu thức 6 div 2 > 10 div 3 mang đến kết qủa là FALSE. 6.2.4. Các phép toán lôgic trên số nguyên : các phép tính NOT, AND, OR, XOR xử lý các bít nhị phân được khẳng định như sau ( bảng 6.3 ): NOT 1 = 0 1 và 1=1 1 OR 1=1 1 XOR 1=0 NOT 0 = 1 1 and 0=0 1 OR 0=1 1 XOR 0=1 0 & 1=0 0 OR 1=1 0 XOR 1=1 0 and 0=0 0 OR 0=0 0 XOR 0=0 Bảng 6.3 từng số nguyên được trình diễn trong thứ dưới dạng một dãy những bít nhị phân. Số hình dáng Integer được màn biểu diễn bằng 16 bit. Ví dụ, số 1 và số 2 có màn biểu diễn trong thiết bị lần lượt là : 0000 0000 0000 0001 0000 0000 0000 0011 Phép rước NOT một số nguyên vẫn đảo toàn bộ các bít màn trình diễn số nguyên đó, có nghĩa là 0 thành 1, còn 1 thành 0. Ví dụ: NOT 1 = 1111 1111 1111 1110 NOT 2 = 1111 1111 1111 1100 Phép đem AND, OR, XOR nhị số nguyên được tiến hành bằng phương pháp AND, OR, XOR từng cặp bít tương xứng của nhì số đó, ví dụ: 1 OR 2 = 0000 0000 0000 0011= 2 1 and 2 = 0000 0000 0000 0001= 1 6.2.5. Các phép dịch chuyển số học SHR và SHL : N SHR k : dịch các bít của số nguyên N sang buộc phải đi k bít. N SHL k : dịch những bít của số nguyên N sang trái đi k bít. Gồm thể chứng minh được : N SHR k = N div 2k N SHL k = N * 2k Ví dụ: 120 shr 4 = 7, vị : 120 shr 4 = 120 div 24 = 120 div 16 = 7. 120 shl 3 = 960, vày : 120 shl 3 = 120 * 23 = 120 * 8 = 960. Nhì phép toán SHR với SHL được sử dụng khi muốn tăng tốc độ giám sát và đo lường trên những số nguyên. 6.2.6. Những hàm tất cả đối số nguyên : Hàm PRED(k) : đối số k nguyên, trả về số nguyên đứng ngay trước k, tức là k-1 . Ví dụ: Pred (5) = 4, Pred (-6) = -7. Hàm SUCC(k) : đối số k nguyên, trả về số nguyên đứng ngay lập tức sau k, tức là k+1 . Ví dụ: Succ (5) = 6, Succ (-6) = -5. Nhấn xét : Lệnh k:=k+1; tương tự với lệnh k:=Succ(k); Lệnh k:=k-1; tương đương với lệnh k:=Pred(k); Hàm ODD(k) : đối số k nguyên, trả về gía trị logic là TRUE ví như k lẻ, là FALSE nếu k chẵn. Ví dụ: Odd(15) = True Odd(4) = False. Ví dụ 6.2 : Nhập số nguyên N, trường hợp N chẵn thì in ra chữ chẵn, nếu như N lẻ thì in ra chữ le? công tác như sau : PROGRAM VIDU62; Var N : Integer; Begin Write(‘Nhap so N :’); Readln(N); If Odd(N) = TRUE then write(N, ‘ La so le’) else write(N, ‘ La so chan’); Readln; End. Chạy Chép tập tin nguồn 6.2.7. Các thủ tục bao gồm đối số nguyên: có hai giấy tờ thủ tục khá thông dụng là: giấy tờ thủ tục INC(k) : tăng k lên một đối kháng vị. Ví dụ, sau khoản thời gian thực hiện các lệnh : k:=5; Inc(k); thì gía trị sau cuối của k là 6. Vậy, lệnh Inc(k); tương đương với lệnh k:=k+1; hay k:=Succ(k); giấy tờ thủ tục DEC(k) : giảm k đi một đối kháng vị. Ví dụ, sau thời điểm thực hiện những lệnh : k:=5; Dec(k); thì gía trị của k đã là 4. Vậy, lệnh Dec(k) ; tương tự với lệnh k:=k-1; hay k:=Pred(k);

Bài viết liên quan