... chương trình sau
Program Tinh_tong;
Uses crt;
Var a,b:integer;
tong:integer;
Begin
Clrscr;
Write(‘Nhap vao 2 so a,b:’);
Readln(a,b);
Tomg:=a+b;
Write(‘tong can tinh:’,s:4);
Readln
End.
... thư viện CRT và GRAPH.
2. Xem trước nội dung các phần 2e, 3 và 4 bài 19 “Thư
viện và chương trình con chuẩn” SGK Trang 113 , 114 .
CŨNG CỐ
1. Các thủ tục và chức năng của chúng trong thư viện ...
giải 640x480 là nói đến màn
hình có 640 dòng và 480 cột.
TRƯỜNG TRUNG HỌC PHỔ THÔNG NGHÈN
TIN HỌC 11
Ñaëng Höõu Hoaøng
Trong thư viện CRT ngoài thủ tục Clrscr còn có một số
thủ...
... năm 2 011
27
Ngày soạn: / /2 011
Ngày giảng: / /2 011 Lớp: 11B1 Sĩ số:
Ngày giảng: / /2 011 Lớp: 11B2 Sĩ số:
Ngày giảng: / /2 011 Lớp: 11B7 Sĩ số:
Chơng 4: Kiểu dữ liệu có cấu trúc
Tiết 21
11 - ... số
cộng.
, Ngày tháng năm 2 011
9
Ngày soạn: / /2 011
Ngày giảng: / /2 011 Lớp: 11B1 Sĩ số:
Ngày giảng: / /2 011 Lớp: 11B2 Sĩ số:
Ngày giảng: / /2 011 Lớp: 11B7 Sĩ số:
Tiết 23...
... ông được tôn làm Bình
Tây Đại Nguyên Soái .Nghĩa quân hoạt
động mạnh mẽ khắp miền Đông
•
- 2 -196 3 Pháp tấn công căn cứ Tân Hòa
Gò Công > Nghĩa quân về Tân Phước
•
- 20-8-1864 địch bất ngờ
... thể ta chỉ cần
viết tên chơng trình con và thay thế (x,k)
bằng giá trị cụ thể tơng ứng.
program Tinh_tong;
var TLuyThua,a,b,c,d:real;
m,n,p,q:integer;
Function LuyThua(x:real;k:integer):real;
var ... chơng
trình. Ví dụ: Tính LuyThua=a
n
. Ta sẽ
gọi LuyThua(a,n)
4
Ngời soạn: Hà Trung Hòa. Lớp: SP Tin 40
Giáo viên hớng dẫn: Lê Thị Bích Liên
Ngày soạn : 30/09/2008
Ngày giảng : / /2008
Chơ...
... (' a = ') ; Readln( a ) ;
Write (' b = ') ; Readln( b ) ;
Write (' Phep tinh thuc hien la (+ - * /) : ') ;
Readln( Pt ) ;
If Pt = '+’ Then T := a + b ;