0
  1. Trang chủ >
  2. Giáo án - Bài giảng >
  3. Tin học >

cau truc re nhanh

Cấu Trúc Rẽ Nhánh

Cấu Trúc Rẽ Nhánh

... crt;•Var a, b, c, d, x1, x2: real;Var a, b, c, d, x1, x2: real;•BeginBegin• Clrscr;Clrscr;•Writeln (‘Nhap cac he so a, b, c’);Writeln (‘Nhap cac he so a, b, c’);•Readln (a,b,c);Readln (a,b,c);•d:= b*b ... sqrt(d))/(2*a):0:8);writeln (‘x2=’,(-b - sqrt(d))/(2*a):0:8);• end;end;•readln;readln;•End.End. Ví dụ 2: Ví dụ 2: Tìm số ngày của năm N, biết rằng năm nhuận là Tìm số ... N, sn: integer;Var N, sn: integer;•BeginBegin• Clrscr;Clrscr;• Writeln (‘Nam’); readln (N);Writeln (‘Nam’); readln (N);•If (N mod 400 = 0) or ((N mod 4 = 0) and (N mod If (N mod 400 = 0) or...
  • 11
  • 2,187
  • 11
Bài 9: Cấu Trúc Rẽ Nhánh

Bài 9: Cấu Trúc Rẽ Nhánh

... Clrscr; Writeln (‘Nam’); readln (N);If (N mod 400 = 0) or ((N mod 4 = 0) and (N mod 100 <> 0)) then sn:= 366 else sn:= 365;Writeln (‘So ngay cua nam’, N, ‘ la ’, sn);Realdn;End.D. Củng cố ... Thuyết trình: (Sau khi học sinh viết chương trình xong nhận xét và chữa bài).5’15’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 then ... + 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 chia...
  • 5
  • 9,914
  • 51
Tiết 11 - cấu trúc rẽ nhánh

Tiết 11 - cấu trúc rẽ nhánh

... b>a b>a then then Max:=b Max:=b ; ;  Cách 2:  If a>b Then Max:=a  Else Max:=b; Cách nào nhanh hơn,tiện hơn? Vì sao? Cách 2: Tiện hơn, hay hơn vì chỉ sử dụng 1 câu lệnh.   3. 3. Câu...
  • 15
  • 957
  • 17
Cấu trúc rẽ nhánh

Cấu trúc rẽ nhánh

... End. Ví dụ: Begin Write(’a, b, c’); Readln(a,b,c); D:= b*b-4*a*c; X1:=(-b-sqrt(D))/(2*a); Dãy các lệnh X2:=(-b+sqrt(D))/(2*a); Write(’X1=’,X1:6:2,’X2= ’,X2:6:2); Readln; End. VD: Ta có mệnh đề sau:...
  • 28
  • 744
  • 0
cấu trúc rẽ nhánh

cấu trúc rẽ nhánh

... so nguyen a’); Read(a); If a mod 2=0 then Write( ‘ a la so chan ’) Readln END. Program kiemtra; Uses Crt; Var a,b,c: integer; BEGIN Clrscr; Write(‘ Nhap vao 3 so nguyen a,b,c); Readln(a,b,c); ... LỆNH GHÉP MỘT SỐ VÍ DỤ Program Giảipt_bac2; Var a,b, c,d: Integer; x,x1,x2: Real; BEGIN Write(‘ Nhap vao 3 so a,b,c’); readln(a,b,c); D:=sqr(b)-4*a*c If D<0 then Writeln(‘Phuong trinh vo nghiem’) ... LỆNH GHÉP MỘT SỐ VÍ DỤ Program doicho; Var a,b,tg: Integer; BEGIN Write(‘ Nhap vao 2 so a,b’); readln(a,b); If a>b then {doi cho b cho a} Begin tg:=a; a:=b; b:=tg; Write(‘ Ket qua tim duoc...
  • 14
  • 599
  • 3
cau truc re nhanh

cau truc re nhanh

... thương 2 số đó CAÁU TRUÙC RE NHAÙNH • Program TinhThuong; • Uses crt; • Var a,b: real; thuong: real; • Begin Clrscr(); Write (‘nhap a: ’); readln(a); Write (‘nhap b: ’); readln(b); If (b=0) then ... (b=0) then write (‘ khong chia duoc’) Else begin thuong:=a/b; write (a,‘/’,b,’=’,thuong); end; Readln(); • End. ...
  • 14
  • 532
  • 1
Cấu trúc rẻ nhánh

Cấu trúc rẻ nhánh

... “Phương trình vô nghiệm” Program Giai_PTB2; uses crt; Var a,b,c:real; D,x1, x2 : real; Begin clrscr; write(‘ nhap cac he so a,b,c’); readln(a,b,c); D:=b*b-4*a*c; If D < 0 then Writeln(‘Phuong ... clrscr; write(‘Nam: ‘); readln(N); if (N mod 400 = 0 ) or (( N mod 4 ) and (N mod 100 <> 0)) then SN:=366 else SN:=365; Writeln(‘ So ngay cua nam’, ‘ la ‘,SN); readln End. ... else begin x1:=(-b-sqrt(D))/2*a); x2:=-b/a-x1; writeln?(‘x1 = ‘, x1:8:3, ‘ x2= ‘,x2:8:3); 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 chia...
  • 17
  • 589
  • 0
Bài 9: Cấu trúc rẽ nhánh

Bài 9: Cấu trúc rẽ nhánh

... đượ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ơ đồ 3/ Câu lệnh ghép: Theo cú pháp, sau một từ khóa (như then, ... 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? 4/ Một số ví dụ: Ví dụ 1: Tìm nghiệm thực của PT bậc 2: ax 2 +bx+c=0...
  • 14
  • 1,815
  • 12

Xem thêm

Từ khóa: cấu trúc rẽ nhánhcấu trúc rẽ nhánh if then elsecấu trúc rẽ nhánh trong pascalcấu trúc rẽ nhánh và lặpcấu trúc rẽ nhánh tin 11cấu trúc rẽ nhánh pascalchuyên đề điện xoay chiều theo dạngNghiên cứu sự hình thành lớp bảo vệ và khả năng chống ăn mòn của thép bền thời tiết trong điều kiện khí hậu nhiệt đới việt namđề thi thử THPTQG 2019 toán THPT chuyên thái bình lần 2 có lời giảiBiện pháp quản lý hoạt động dạy hát xoan trong trường trung học cơ sở huyện lâm thao, phú thọGiáo án Sinh học 11 bài 13: Thực hành phát hiện diệp lục và carôtenôitGiáo án Sinh học 11 bài 13: Thực hành phát hiện diệp lục và carôtenôitNGHIÊN CỨU CÔNG NGHỆ KẾT NỐI VÔ TUYẾN CỰ LY XA, CÔNG SUẤT THẤP LPWAN SLIDEPhát triển mạng lưới kinh doanh nước sạch tại công ty TNHH một thành viên kinh doanh nước sạch quảng ninhPhát triển du lịch bền vững trên cơ sở bảo vệ môi trường tự nhiên vịnh hạ longNghiên cứu tổng hợp các oxit hỗn hợp kích thƣớc nanomet ce 0 75 zr0 25o2 , ce 0 5 zr0 5o2 và khảo sát hoạt tính quang xúc tác của chúngNghiên cứu khả năng đo năng lượng điện bằng hệ thu thập dữ liệu 16 kênh DEWE 5000Tìm hiểu công cụ đánh giá hệ thống đảm bảo an toàn hệ thống thông tinThiết kế và chế tạo mô hình biến tần (inverter) cho máy điều hòa không khíSở hữu ruộng đất và kinh tế nông nghiệp châu ôn (lạng sơn) nửa đầu thế kỷ XIXQuản lý nợ xấu tại Agribank chi nhánh huyện Phù Yên, tỉnh Sơn La (Luận văn thạc sĩ)Tranh tụng tại phiên tòa hình sự sơ thẩm theo pháp luật tố tụng hình sự Việt Nam từ thực tiễn xét xử của các Tòa án quân sự Quân khu (Luận văn thạc sĩ)Giáo án Sinh học 11 bài 15: Tiêu hóa ở động vậtGiáo án Sinh học 11 bài 14: Thực hành phát hiện hô hấp ở thực vậtGiáo án Sinh học 11 bài 14: Thực hành phát hiện hô hấp ở thực vậtQUẢN LÝ VÀ TÁI CHẾ NHỰA Ở HOA KỲ