Bai 9Cau truc re nhanh(11)

... <= DTB <= 10 Loại khá: 6.5 <= DTB < 8.0 Loại trung bình: 5 <= DTB < 6.5 - Treo bảng phụ 7 ã Hoạt động 3: Tìm hiểu sự cần thiết của câu lệnh ghép Hoạt động của giáo viên Hoạt

Ngày tải lên: 29/06/2014, 14:54

... cũng không được thực hiện nhưng câu lệnh if – then chưa kết thúc mà câu lệnh 7’ so a, b, c’); Readln (a,b,c); d:= b*b – 4*a*c; if D<0 then writeln (‘Phuong trinh vo nghiem’) else if D=0 ... writeln (‘x1=’,(-b + sqrt(d))/ (2*a):0:8); writeln (‘x2=’,(-b - sqrt(d))/ (2*a):0:8); end; readln; End. - Ví dụ 2: Tìm số ngày của năm N, biết rằng năm nhuận là năm chia hết cho 400 hoặc ....

Ngày tải lên: 10/09/2012, 14:56

Ngày tải lên: 07/07/2013, 01:26

Ngày tải lên: 09/07/2013, 01:26

Ngày tải lên: 09/07/2013, 01:26

... bậc hai của số a với a nhập từ bàn phím. PROGRAM Tinh_can_bac_hai ; VAR a : Real ; BEGIN Write (’ Nhap so a = ‘ ) ; Readln(a) ; IF a < 0 THEN Write ( a : 10 : 2 ,’ La so am nen khong lay ... lay can duoc ') ELSE Writeln (’ Can bac hai cua ’, a : 2 : 2 ,’ la’ , SQRT(a) :10 : 3 ); Readln; {dung man hinh de xem ket qua} END. Ghi chú Trong chương trình trên, a ta thấy có dạng

Ngày tải lên: 16/12/2013, 08:15

... ; end; 3.Câu lệnh ghép program giai_ptBAC2 ; uses crt ; var a,b,c : real; Delta, x1, x2 : real; begin clrscr ; write ( ‘a, b, c: ’ ) ; readln(a, b, c) ; delta := b*b-4*a*c ; if delta < 0 then ... x2 := -b/a – x1 ; writeln ( ‘ Phuong trinh co nghiem x1 = ’, x1:8:3, ‘ x2= ’,x2:8:3 ) ; readln end. begin end; 1. Rẽ nhánh Ví dụ về mệnh đề “Nếu … thì” → Dạng phủ định của mệnh đề...

Ngày tải lên: 28/05/2014, 16:39

Ngày tải lên: 13/07/2014, 16:00

... <Câu lệnh 1> E LSE <Câu lệnh2>; Boot from CD : Disk boot failure, i nsert system disk and press enter. TỔ : TOÁN-TIN HỌC TRƯỜNG THPT QUỐC THÁI GV : Leâ Vaên Phuù Quốc Thái

Ngày tải lên: 15/07/2014, 17:00

... phương trình bậc hai: 2 ax 0bx c + + = Program Giai_PTB2; Var a, b, c: real; D, x1, x2: real; Begin write (‘a, b, c :’); readln(a,b,c); D:= b*b – 4*a*c; If D<0 then writeln(‘ PTVN ‘) Else Begin x1:= ... PTVN ‘) Else Begin x1:= (-b – sqrt(D)) / (2*a); x2:= -b/a – x1; writeln(‘ x1=‘, x1,’x2=‘,x2); End; Readln; End. Ví dụ 1: 1. Rẽ nhánh Tình huống 1 Tình huống 2 2.Câu lệnh If then a. Dạ...

Ngày tải lên: 19/07/2014, 11:00