... Loại theo công thức sau:
Loại = ‘Cao’ nếu Tiền > 500 00
Loại = ‘TB’ nếu 200 00& lt;= Tiền <= 500 00
Loại = ‘THAP’ nếu Tiền < 200 00.
... Loại : Tiền = Số lương x ðơn giá .
Loại = ‘Cao’ nếu Tiền > 500 000 .
Loại = ‘THAP’ nếu Tiền <= 500 000 .
5. Viết chương trình tạo tệp dữ liệu ‘SACH.DAT’ chứa bảng danh mục của n quyển ... luong:=heso * 2 100 00;
end;
With banghk1 do
begin
pho:='Hang Dao';
tel:=8 573 9 80;
end;
With luong2 do Readln(hoten);
With bangkh2 do Writeln(pho);
1.5 - Các chương trình sử...
...
CHƯƠNG TRÌNH CON: HÀM VÀ THỦ TỤC
1 - Cấu trúc của hàm và thủ tục
1.1- Chương trình con
Khi lậptrình gặp ñoạn chương trình cần dùng nhiều lần, ñể tránh viết lặp lại thì ñoạn
chương trình ... chương trình, bài toán lớn ñược phân
thành các phần nhỏ, mỗi phần xây dựng thành các chương trình con. Chương trình chính sẽ
gọi tới các chương trình con .
Trong Pascal có 2 loại chương trình ... Chương trình có chương trình con.
3. Cho dãy số sau: a
1
,a
2
, ,a
n
. Viết chương trình tính tổng, trung bình cộng các phần tử của
dãy số ñó. Chương trình viết có chương trình con.
4. Lập chương...
... ký tự 'a ' hoặc ‘A’ trong xâu.
9. Viết chương trình nhập vào một xâu ký tự. Hãy kiểm tra xem xâu ñó có ñối xứng không. In
kí tự ñầu và kí tự cuối của xâu ñó.
10. Viết chương trình ... xâu ký tự có ñộ dài bằng nhau. Hãy xây dựng xâu chứa
các ký tự xen kẽ của hai xâu ñó, theo thứ tự một kí tự của xâu1 rồi ñến 1 kí tự của xâu 2.
Trư
ờng ðại học Nô
ng nghi
ệp 1
-
Giáo trình ... Ngaysinh:=' 20- 10- 19 60& apos;;
Quequan:='Gia lam - Ha noi ';
c. Truy nhập xâu kí tự
Mỗi kí tự trong xâu ñược chỉ ra bằng 1 số thứ tự ñược gọi là chỉ số viết trong [ ], kí tự ñầu
tiên...
... với ñộ chính xác ε= 10
-4
( ABS(x
n
/n!) < ε ), giá trị x
ñược nhập vào từ bàn phím khi chạy chương trình.
7. Cần có 500 00 ñ từ các loại giấy bạc 100 0ñ, 200 0ñ và 500 0ñ. Tìm tất cả các phương ... writeln(r :7) ; sẽ cho kết quả
1.234 500 000 E +02 ( 10 chữ số dành cho phần lẻ )
123.4 50
1.2E +00 ( có làm tròn )
*- Viết ra kiểu kí tự
Với kiểu kí tự, viết không quy cách sẽ cho ra kí tự bình ... WRITELN(HT:25,HS:6:2,LUONG: 10: 1,BHXH: 10: 1,BHYT: 10: 1,TL: 10: 1);
READLN;
END.
Trư
ờng ðại học Nô
ng nghi
ệp 1
-
Giáo trình
Tin h
ọc
ñ
ại
c
ươ
ng
1 30
1 30
VD2: Viết chương trình...
... với ñộ chính xác
ε= 10
-4
( ABS(x
n
/n!) < ε
), giá trị x ñược nhập vào từ bàn
phím khi chạy chương trình.
7. Cần có 500 00 ñ từ các loại giấy bạc 100 0ñ, 200 0ñ và 500 0ñ. Tìm tất cả các ... khoá )
Phạm vi biểu diễn Kích thước (byte)
Byte 0 255 1
Shortint -128 1 27 1
Integer -3 276 8 3 276 7 2
Word 0 65535 2
Longint -21 474 83648 21 474 836 47 4
2.2. Kiểu số thực
Kiểu số thực là tập ... Kích thước ( byte )
Single 1.5E-45 3.4E+38 7- 8 4
Real 2.9E-39 1.7E+38 11-12 6
Double 5.0E-324 1.7E+ 308 15-16 8
Extended 3.4E-4932 1.1E+4932 19- 20 10
...
... dài quá 1 27 kí tự (!). Tên thường ñược ñặt mang tính gợi nhớ. TURBOPASCAL
không phân biệt chữ hoa và chữ thường khi viết từ khoá hay tên.
Ví dụ : khi viết chương trình giải phương trình bậc ... chính của chương trình ñể giải quyết bài toán.
Người lậptrình phải bỏ nhiều công sức ñể thiết kế thuật giải và viết chương trình cho phần
này.
4.4. Các bước cơ bản khi lậptrình
Trước ... chương trình giải quyết một bài toán nào ñó, người lậptrình phải biết cách
giải bài toán ñó hay chính xác hơn phải biết thuật giải ñể giải bài toán và trình bày thuật giải
bằng ngôn ngữ lập trình...