... Bài 19 Số siêu nguyên tố Số siêu nguyên tố số nguyên tố mà bó số tuỳ ý chữ số bên phải phần lại tạo thành số nguyên tố Ví dụ: 7333 số siêu nguyên tố có chữ số 733; 73; số nguyên tố Hãy lập chương ... End Bài 18 Bài toán số nguyên tố tương đương Hai số tự nhiên gọi nguyên tố tương đương chúng có chung ước số nguyên tố Ví dụ số 75 15 nguyên tố tương đương có ước nguyên tố Cho trước hai số tự ... nhiên N Lập chương trình tìm tất số hoàn hảo có giátrị từ đến N (nếu có) Nếu đưa thông báo “Không có” (Số hoàn hảo số tự nhiên thoả mãn điều kiện: giátrị số tổng ước số thực mà không kể số đó) uses...
... hình: a Chữ nhật đặc c Tam giác cân đặc e Tam giác vuông đặc b Chữ nhật rỗng d Tam giác cân rỗng f Tam giác vuông rỗng (Hình chữ nhật: nhập chiều dài chiều rộng, Tam giác: nhập chiều cao; vẽ hình ... rong, nhap:2'); writeln(' Ve tam giac can dac, nhap:3'); writeln(' Ve tam giac can rong, nhap:4'); writeln(' Ve tam giac vuong dac, nhap:5'); writeln(' Ve tam giac vuong rong, nhap:6'); writeln; ... nam:',n,' trau gia: ',g); readln; end var i,j:integer; begin for i:=1 to 25 for j:=1 to 50 if (i*4+j*2=100) and (i+j=36) then writeln(i,' cho, ',j,' ga.'); readln; end VCT xuất số nguyên tố từ n...
... ( giátrị đầu) to ( giátrị cuối) do; b Cấu trúc lệnh lặp : for ( giátrị cuối) to ( giátrị đầu) do; c Cấu trúc lệnh lặp : ( giátrị cuối) to ( giátrị đầu) for; d Cấu trúc lệnh lặp : ( giátrị ... đếm>= to B For := to C For := downto D For :
... thực in kết phép tính Nếu “+”, in kết tổng lên hình Nếu “-”, in kết hiệu lên hình Nếu “/”, in kết thương lên hình Nếu “*”, in kết tích lên hình Nếu “+”, in kết tổng lên hình Nếu “+”, in kết tổng ... :=1; giatri :=1; While i
... Đào Linh Giang Trịnh Quỳnh Anh Phan Thanh Thái Vũ Thị Tú Anh Lê Thị Hơng Lê Đình Quân Lê Thị Vân Anh Hoàng Văn Thiết Bùi Văn Tiến Nguyễn Văn Tùng Trịnh Quang Huy Vũ Văn Cờng Nguyễn Đình Nhạ Phạm ... 14-03-1996 02-01-1996 16-02-1996 Trịnh Thị Kiều Oanh ĐinhVăn Tâm Lữ Đăng Trờng Nguyễn Huy Vinh Trịnh Văn Nam Khơng Bá Duy Nguyễn Thị Chinh Trần Việt Anh Lê Đình Chức Nguyễn Duy Khang Lê Việt ... Hng Nguyễn Thị Cúc Hà Thị Hiền Trịnh Thị Hiền Lê Thị Thùy Dung Phạm Vn Sơn Lý Trờng Tùng Lê Văn Cân Lê Thị ánh Ngô Xuân Tuấn Nguyễn Mậu Hng Hà Duyên Đồng Phạm Văn Nam Ngày sinh 11-05-1996 09-06-1996...
... phím; - Gán cho biến tam giátrị a - Gán giátrị b cho a (Sau lệnh a có giátrị b) - Gán giátrị tạm cho cho b (Sau lệnh b có giátrị tam = a) b Mã chương trình: Program Doi _Gia_ Tri; uses crt; var ... bậc số Để cộng dồn giátrị vào biến biến có giátrị ban đầu Để nhân dồn giátrị ban đầu vào biến biến cần có giátrị ban đầu Bài tập 1.8: Viết chương trình nhập hai số, đổi giátrị hai số in hai ... tam giác có tam giác hay ba cạnh tam giác a Hướng dẫn: - Nhập ba cạnh tam giác vào ba biến a,b,c Trang 100 tập Turbo Pascal - Nếu a = b b = c tam giác tam giác ngược lại tam giác không tam giác...
... thực in kết phép tính Nếu “+”, in kết tổng lên hình Nếu “-”, in kết hiệu lên hình Nếu “/”, in kết thương lên hình Nếu “*”, in kết tích lên hình Nếu “+”, in kết tổng lên hình Nếu “+”, in kết tổng ... Readln(n); i:=1; giatri:=1; While i
... trị lớn diện tích tam giác AMN - Dòng thứ năm giátrị nhỏ diện tích tam giác AMN (Các giátrị diện tích ghi dạng thập phân với chữ số sau dấu phẩy) Ví dụ: DIENTICH.INP Kết hình (hoặc file DIENTICH.OUT) ... cầu: Biết độ dài BM, tính diện tích hình chữ nhật ABCD diện tích tam giác MCN 2.Tìm giátrị lớn giátrị nhỏ diện tích tam giác AMN M, N thay đổi Dữ liệu vào: Dữ liệu tốn cho tệp tin DIENTICH.INP ... Dữ liệu ra: Kết ghi hình (hoặc ghi file DIENTICH.OUT) dòng: - Dòng đầu ba số a, b x - Dòng thứ hai diện tích hình chữ nhật ABCD - Dòng thứ ba diện tích tam giác MCN - Dòng thứ tư giátrị lớn diện...
... sogiay,gio,phut,giay:Integer; Begin Writeln('TINH GIO:PHUT:GIAY'); Writeln(' '); Write('-Nhap so giay can tinh: '); Readln(sogiay); gio:=sogiay DIV 3600; sogiay:= sogiay MOD 3600; phut:=sogiay DIV ... phut:=sogiay DIV 60; giay:=sogiay MOD 60; Writeln; Writeln('KET QUA CHUYEN DOI'); Writeln('+Neu nhap vao: ',sogiay,' giay'); Writeln('+Doi thanh: ',gio,' gio, ',phut,' phut, ',giay,' giay'); Readln ... Writeln(' *Gia xuat xuong = ',pe:10:2,' dong'); Writeln(' *Gia ban de hoa von la : ',pc:10:2,' dong'); Writeln(' Bam phim de ket thuc'); Readln End Chương Bài Program Tinh_Gio_Phut_Giay; Var sogiay,gio,phut,giay:Integer;...
... đồ đường: + Trục tung: Thể trị số đối tượng (trị số %), góc tọa độ 0, trị số ≤ 100 Hoặc trục tung trị số % mà giátrị khác tùy theo yêu cầu đề + Trục hoành: Thể thời gian (năm), góc tọa độ trùng ... điểm giátrị năm tương ứng + Nếu có hai đường trở lên, phải vẽ hai đường phân biệt thích theo thứ tự đề cho + Ghi tên biểu đồ bên Ví dụ 1: Cho bảng số liệu số lượng gia súc ,gia cầm số tăng trưởng(năm ... 182,6 130,4 23169,5 189,0 233,3 217,2 tăng trưởng đàn gia súc ,gia cầm qua năm 1900, Trâu Chỉ số Bò Chỉ số (nghìn tăng (nghìn tăng con) trưởng(%) con) trưởng(%) Lợn (nghìn con) 1990 1854,1 100,0 3116,9...
... Ampe kế A1 có điện trở không đáng kể, đèn Đ ghi 20V- 10W Ngời ta thấy để đèn sáng bình thờng chạy C vị trí mà điện trở đoạn CM gấp hai lần điện trở đoạn CN ampe kế A1 0,75A a Tìm giátrị biến trở ... Ampekế có điện trở R a=1 , Rx biến trở, U không đổi Bỏ qua điện trở dây nối khóa K a K đóng, thay đổi giátrị R x đến công suất tiêu thụ A Rx đạt cực đại ampekế 3A Xác định hiệu điện U b K mở, ... Tìm giátrị biến trở RMN b Thay đèn Đ ampe kế A2 có điện trở 10 Dịch chuyển vị trí chạy C đoạn MN đến vị trí mà ampekế A giátrị cực đại Tính giátrị cực đại Câu (3,0 điểm) Cho mạch điện nh...
... phím; - Gán cho biến tam giátrị a - Gán giátrị b cho a (Sau lệnh a có giátrị b) - Gán giátrị tạm cho cho b (Sau lệnh b có giátrị tam = a) b Mã chương trình: Program Doi _Gia_ Tri; uses crt; var ... bậc số Để cộng dồn giátrị vào biến biến có giátrị ban đầu Để nhân dồn giátrị ban đầu vào biến biến cần có giátrị ban đầu Bài tập 1.8: Viết chương trình nhập hai số, đổi giátrị hai số in hai ... tam giác có tam giác hay ba cạnh tam giác a Hướng dẫn: - Nhập ba cạnh tam giác vào ba biến a,b,c Trang 100 tập Turbo Pascal - Nếu a = b b = c tam giác tam giác ngược lại tam giác không tam giác...
... dẫn nằm mạch hở; điện trở khác mắc song song với vật dãn có điện trở 0( điện trở bị nối tắt) ; vôn kế có điện trở lớn (lý tưởng) 4/ Vai trò am pe kế sơ đồ: * Nếu am pe kế lý tưởng ( Ra=0) , chức ... Điện trở toàn phần biến trở Ro , điện trở vôn kế R lớn Bỏ qua điện trở ampe kế, dây nối phụ A thuộc điện trở vào nhiệt độ Duy trì hai đầu mạch hiệu điện U không đổi Lúc đầu chạy C biến trở C đặt ... đổi) P Bài 13: Cho hai vôn kế V1, V2 giống hệt nhau, hai điện trở có giátrị R hai điện trở C D V2 A V1 giátrị 3R (hình vẽ ) Số máy đo M N mA, V V.Tính R ? *Hướng dẫn giải: * Hướng dẫn học sinh...
... 25 km/h 1/2 ®o¹n ®êng cßn l¹i vËt chun ®éng theo hai giai ®o¹n : Giai ®o¹n 1/3 thêi gian ®i víi vËn tèc V2= 17 km/h Giai ®o¹n 2/3 thêi gian vËt chun ®éng víi vËn tèc V 3= 14 km/h TÝnh vËn ... đường theo giai đoạn sau: Giai đoạn 1: Chuyển động thẳng với vận tốc 18 km/h km Giai đoạn 2: Chuyển động biến đổi 45 phút với vận tốc 30 km/h Giai đoạn 3: Chuyển động qng đường km thời gian 10 phút ... sáng cần vẽ b/ Ta phải tính góc ISR Kẻpháp tuyến I J cắt K 0,5 điểm Trong tứ giác IKJO có góc vng I J có góc O = 600 0,5 điểm Do góc lại IKJ = 1200 Suy ra: Trong ∆ JKI có : I1 + J1 = 600 Mà cặp...
... kết phép tính Nếu ‚+‛ , in kết tổng lên hình Nếu ‚-‛ , in kết hiệu lên hình Nếu ‚/‛ , in kết thương lên hình Nếu ‚*‛ , in kết tích lên hình Nếu ‚+‛ , in kết tổng lên hình Nếu ‚+‛ , in kết ... ba số có lập thành ba cạnh tam giác hay không ? _ Viết thủ tục tính diện tích tam giác _ Viết thủ tục tính trung tuyến tam giác _ Viết hoàn thiện chương trình GIẢI Uses Crt; Var a, b, c: real ... sau : 1 Nhập liệu ( nhập số tự nhiên n ) 2 Phân tích thừa số nguyên tố ( phân tích n thành tích số nguyên tố ) 3 Thoát khỏi chương trình GIẢI Uses Crt; Type uoc_nguyen_to=array[1 50] of longint;...
... kết phép tính Nếu “+” , in kết tổng lên hình Nếu “-” , in kết hiệu lên hình Nếu “/” , in kết thương lên hình Nếu “*” , in kết tích lên hình Nếu “+” , in kết tổng lên hình Nếu “+” , in kết ... THCS ÂN HẢO GV:CAO VĂN QUANG Nhập bốn số a , b , c , d Hãy tìm giá trò lớn chúng gán giá trò lớn cho biến Max GIẢI Var Max , a , b , c , d : Real ; BEGIN Writeln (' Nhap giatri cua so : ') ... ba số có lập thành ba cạnh tam giác hay không ? _ Viết thủ tục tính diện tích tam giác _ Viết thủ tục tính trung tuyến tam giác _ Viết hoàn thiện chương trình GIẢI Uses Crt; Var a, b, c: real...
... phím; - Gán cho biến tam giátrị a - Gán giátrị b cho a (Sau lệnh a có giátrị b) - Gán giátrị tạm cho cho b (Sau lệnh b có giátrị tam = a) b Mã chương trình: Program Doi _Gia_ Tri; uses crt; var ... bậc số Để cộng dồn giátrị vào biến biến có giátrị ban đầu Để nhân dồn giátrị ban đầu vào biến biến cần có giátrị ban đầu Bài tập 1.8: Viết chương trình nhập hai số, đổi giátrị hai số in hai ... tam giác có tam giác hay ba cạnh tam giác a Hướng dẫn: - Nhập ba cạnh tam giác vào ba biến a,b,c Trang 100 tập Turbo Pascal Nếu a = b b = c tam giác tam giác ngược lại tam giác không tam giác...
... thực in kết phép tính Nếu “+”, in kết tổng lên hình Nếu “-”, in kết hiệu lên hình Nếu “/”, in kết thương lên hình Nếu “*”, in kết tích lên hình Nếu “+”, in kết tổng lên hình Nếu “+”, in kết tổng ... Readln(n); i:=1; giatri:=1; While i