Viết Chương Trình Giải Phương Trình Bậc 2 Lớp 11, Viết Chương Trình Giải Phương Trình Bậc 2

Câu 1: Viết chương trình giải hệ 2 phương trình bậc nhất, với a, b, c, d, e, f, là các hệ số thực nhập vào từ bàn phím. Thông báo kết quả ra màn hình.

Đang xem: Viết chương trình giải phương trình bậc 2 lớp 11

Câu 2: Viết chương trình giải phương trình bậc hai: ax2 + bx + c = 0, với a, b, c là các hệ số thực nhập vào từ bàn phím.

Xem thêm: Phương Pháp Viết Quy Trình : Những Lưu Ý Quan Trọng, Biên Soạn Quy Trình: Những Lưu Ý Quan Trọng

Câu 3: Nhập vào một dãy n số bất kỳ từ bàn phím. Tìm giá trị lớn nhất và nhỏ nhất của dãy số đó. In kết quả tìm được ra màn hình cùng vị trí của các giá trị max, min trong dãy số.

Xem thêm: Trần Văn Bình Master:

Câu 4: Viết chương trình nhập vào ma trận thực Anxm . Sau đó tìm giá trị lớn nhất, giá trị nhỏ nhất của ma trận này. In ma trận cùng kết quả tìm được ra màn hình.

3 trang

minh_thuy

8658

18hướng dẫn
Bạn đang xem tài liệu “Một số bài tập Pascal lớp 11”, để tải tài liệu gốc về máy bạn click vào nút DOWNLOAD ở trên

Một số bài tập Pascal lớp 11Câu 1: Viết chương trình giải hệ 2 phương trình bậc nhất, với a, b, c, d, e, f, là các hệ số thực nhập vào từ bàn phím. Thông báo kết quả ra màn hình.Câu 2: Viết chương trình giải phương trình bậc hai: ax2 + bx + c = 0, với a, b, c là các hệ số thực nhập vào từ bàn phím.Câu 3: Nhập vào một dãy n số bất kỳ từ bàn phím. Tìm giá trị lớn nhất và nhỏ nhất của dãy số đó. In kết quả tìm được ra màn hình cùng vị trí của các giá trị max, min trong dãy số.Câu 4: Viết chương trình nhập vào ma trận thực Anxm . Sau đó tìm giá trị lớn nhất, giá trị nhỏ nhất của ma trận này. In ma trận cùng kết quả tìm được ra màn hình.Hướng dẫn giải bài tập1. Giải hệ bậc nhất 2 ẩn:PHP:{HE 2 PHUONG TRINH BAC NHAT}uses crt;var a,b,c,d,e,f,DD,Dx,Dy:real;BEGINclrscr;Writeln(“Nhap he so a, b, c: “); readln(a,b,c);Writeln(“Nhap he so d, e, f: “); readln(d,e,f);DD:=a*e-d*b;Dx:=c*e-f*b;Dy:=a*f-d*c;IF DD0 thenwriteln(“HPT co nghiem duy nhat: x=”,Dx/DD:5:2,” va y=”,Dy/DD:5:2);IF DD=0 thenBeginIF (Dx0) or (Dy0) then writeln(“HPT vo nghiem :(“);IF (Dx=0) and (Dy=0) then writeln(“HPT vo so nghiem :))”);End;readln;END.2. Giải PT bậc 2:PHP:{Giai phuong trinh bac 2}uses crt;var a,b,c,delta:real;BEGINclrscr;repeatwrite(“Nhap a, b, c:”); readln(a,b,c);Until (a0) or (b0) or (c0);IF a=0 thenIF b0 then writeln(“Phuong trinh co nghiem duy nhat: x= “,-c/b:6:3)else write(“Phuong trinh vo nghiem!!!”)ELSEBegin DELTA:=b*b-4*a*c;If delta=0 then write(“Phuong trinh co nghiem kep: x=”,-b/a:6:3);IF delta>0 thenbegin writeln(“Phuong trinh co 2 nghiem phan biet: “);writeln(“X1= “,(-b+sqrt(delta))/2/a:6:3);writeln(“X2= “,(-b-sqrt(delta))/2/a:6:3);end;If deltamax then max:=a;IF amax then max:=a;IF a