bai soan cau lenh re nhanh

Ngày tải lên: 13/07/2014, 18:20

... 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 ... nghiêm hoặc thông báo “phương trình vô nghiệm”. Program GPTB2; Uses crt; Var a, b, c, d, x1, x2: real; Begin Clrscr; Writeln (‘Nhap cac he 2 sẽ đựoc thực hiện. Giáo viên: - Thuyết trình: Sau...

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

... Program giai_ptb2; uses crt; var a, b, c: real; D, x1, x2: real; begin clrscr; Write(‘ a = ‘); Readln(a); Write(‘ b = ‘); Readln(b); Write(‘ c = ‘); Readln(c); D := b*b - 4*a*c; if ... =‘, x2); end; else else Writeln(‘ phuong trinh vo nghiem’); readln; end. 1. Caïc vê duû vãö re 1. Caïc vê duû vãö re nhaïnh nhaïnh Nháûp a, b, c D ← b 2 -4ac D ≥ 0 Thäng baïo vä ... Nóỳu Nóỳu Thỗ Thỗ Nóỳu khọng Nóỳu khọng thỗ thỗ 1. Caùc vờ duỷ vóử re nhaùnh 1. Caùc vờ duỷ vóử re 1. Caùc vờ duỷ vóử re nhaùnh nhaùnh Nóỳu trồỡi khọng mổa Chỏu õóỳn nhaỡ ngoỹc Nóỳu...

Ngày tải lên: 16/06/2013, 01:25

... lệnh>; End; Điều kiện Câu lệnh 1 Câu lệnh 2 T F Sơ đồ Hãy chỉ ra hứơng thực hiện của cấu trúc rẽ nhanh dạng đủ bằng lưu đồ bên? 2/ Câu lệnh if-then: Để mô tả cấu trúc rẽ nhánh, Pascal dùng ... được biểu diễn băng sơđồ sau: Điều kiện Câu lệnh T F Hãy chỉ ra hứơng thực hiện của cấu trúc rẽ nhanh dạng thiếu bằng lưu đồ bên? Sơ đồ a,b,c= 1 2 1 ∆ = 2∗2 − 4∗1∗1 = 0 PT v« nghiÖm PT...

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

... SỐ 2 ĐAKRÔNG Gv: Phan Xuân Trí Quảng Trị 10.2010 Bo o t fro m CD : Disk boot failure, insert system disk and press enter. b. D¹ng ®ñ IF <§iÒu kiÖn> THEN <C©u lÖnh 1> ELSE...

Ngày tải lên: 18/10/2013, 20:11

... i: integer; S: longint; Begin Write(‘nhap n’); Readln(n); S:=0; For i:=1 to n do S:=S+i; Writeln(‘tong cua n so tu nhien dau tien S=’,S); Readln; End. BÀI 7: CÂU LỆNH LẶP (tt) 14 Program ... Tinhgiaithua; Var n, i: integer; P : longint; Begin Write(‘nhap n’);Readln(n); P:=1;For i:=1 to n do P:=P*i; Writeln(N,’!=’,P); Readln; End.  Ví dụ 6: Chương trình tính N!, với N là số tự nhiên ... LẶP Program InchuO; Var i: integer; Begin For i:=1 to 20 do Begin Writeln(‘O’); Delay(100) end; Readln; End. 1 13 Lưu ý: Vì N lớn nên tổng của N số tự nhiên lớn nên trong chương trình trên...

Ngày tải lên: 01/12/2013, 03:11

... 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 đề trên...

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

Ngày tải lên: 21/06/2014, 12:20

Ngày tải lên: 10/07/2014, 08:20

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

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

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

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

Ngày tải lên: 11/08/2014, 05:22

Ngày tải lên: 24/10/2014, 07:00

Ngày tải lên: 29/10/2014, 23:00

... 1 : printf(“Mot”); break; case 1 : printf(“MOT”); break; case 2 : printf(“Hai”); break; case 3 : printf(“Ba”); break; case 1 : printf(“1”); break; case 1 : printf(“mot”); break; default : printf(“Khong ... printf(“Nam”); switch (a) { case 1: printf(“Mot”); break; case 2: printf(“Hai”); break; case 3: printf(“Ba”); break; case 4: printf(“Bon”); break; case 5: printf(“Nam”); } VC & BB 2222 Bài ... nguyen: ”); scanf(“%d”, &n); switch (n) { case 1: printf(“Mot”); break; case 2: printf(“Hai”); break; case 3: printf(“Ba”); break; … default: printf(“Ko biet doc”); } } VC & BB 99 Câu lệnh...

Ngày tải lên: 04/09/2012, 15:59