Một Số Bài Tập Pascal Lớp 11

  • Trang Chủ
  • Đăng ký
  • Đăng nhập
  • Upload
  • Liên hệ

Lớp 11, Giáo Án Lớp 11, Bài Giảng Điện Tử Lớp 11

Trang ChủTin Học Lớp 11 Một số bài tập Pascal lớp 11 Một số bài tập Pascal lớp 11

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.

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.

 

doc 3 trang Người đăng minh_thuy Lượt xem 11318Lượt tải 5 Download 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ênMột số bài tập Pascal lớp 11 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. 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ập 1. 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; BEGIN clrscr; 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 then writeln('HPT co nghiem duy nhat: x=',Dx/DD:5:2,' va y=',Dy/DD:5:2); IF DD=0 then Begin IF (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; BEGIN clrscr; repeat write('Nhap a, b, c:'); readln(a,b,c); Until (a0) or (b0) or (c0); IF a=0 then IF b0 then writeln('Phuong trinh co nghiem duy nhat: x= ',-c/b:6:3) else write('Phuong trinh vo nghiem!!!') ELSE Begin DELTA:=b*b-4*a*c; If delta=0 then write('Phuong trinh co nghiem kep: x=',-b/a:6:3); IF delta>0 then begin 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 delta<0 then write('Phuong trinh vo nghiem.!!.'); end; readln; END. 3. Nhập vào dãy n số bất kỳ từ bàn phím. Tìm giá trị max, min của dãy. In kết quả tìm được ra màn hình cùng vị trí max, min trong dãy. PHP:  {MAX, MIN cua day} uses crt; var A: array[1..1000] of INTEGER; n,i,max,min:integer; BEGIN clrscr; write('Nhap so phan tu cua day: '); read(n); FOR i:=1 to n do Begin write('A[',i,']= '); read(a[i]); end; max:=a[1]; min:=a[1]; FOR i:=1 to n do BEGIN IF a[i]>max then max:=a[i]; IF a[i]<min then min:=a[i]; END; writeln('Gia tri MAX = ',max); writeln('Gia tri MIN = ',min); write('Cac vi tri max la: '); For i:=1 to n do If a[i]=max then write(i:4); writeln; write('Cac vi tri min la: '); For i:=1 to n do If a[i]=min then write(i:4); readln; readln; END.  Bài 4: Tìm giá trị MAX, MIN của ma trận PHP:  uses crt; var A: array[1..100,1..100] of INTEGER; n,m,i,j,max,min:integer; BEGIN clrscr; write('Nhap n,m cua ma tran A[n,m]: '); read(n,m); FOR j:=1 to m do FOR i:=1 to n do Begin write('A[',i,',',j,']= '); read(a[i,j]); end; max:=a[1,1]; min:=a[1,1]; tong:=0; FOR j:=1 to m do FOR i:=1 to n do Begin IF a[i,j]>max then max:=a[i,j]; IF a[i,j]<min then min:=a[i,j]; End; writeln('Gia tri MAX cua ma tran la ',max); writeln('Gia tri MIN cua ma tran la ',min); readln; END. 

Tài liệu đính kèm:

  • docmot_so_bai_tap_Pascal_hay_lop_11.doc
Tài liệu liên quan
  • docxBài tập Tin học Lớp 11 - Chương IV: Mạch dao động-sóng điện từ

    Lượt xem Lượt xem: 650 Lượt tải Lượt tải: 0

  • pptGiáo án Tin học 11 - Tiết 5: Khai báo biến - Các phép toán biểu thức - Câu lệnh gán

    Lượt xem Lượt xem: 1915 Lượt tải Lượt tải: 1

  • docGiáo án môn Tin học 11 - Kiểu dữ liệu tệp – Thao tác với tệp

    Lượt xem Lượt xem: 1762 Lượt tải Lượt tải: 1

  • docBài giảng Tin học 11 - Bài 27: Thực hành lập trang tính và sử dụng hàm

    Lượt xem Lượt xem: 3724 Lượt tải Lượt tải: 1

  • docGiáo án giảng dạy môn Tin học 11 - Tiết 19: Bài tập chương 3

    Lượt xem Lượt xem: 2084 Lượt tải Lượt tải: 1

  • docGiáo án môn Tin học 11 - Bài 7: Các thủ tục chuẩn vào/ra đơn giản

    Lượt xem Lượt xem: 5873 Lượt tải Lượt tải: 1

  • docGiáo án Tin học 11 - Lê Đức Anh

    Lượt xem Lượt xem: 2350 Lượt tải Lượt tải: 2

  • docGiáo án Tin học 11 - Tiết 44 - Bài 12: Các loại kiến trúc của hệ cơ sở dữ liệu

    Lượt xem Lượt xem: 1743 Lượt tải Lượt tải: 0

  • docGiáo án Tin học 11 - Tiết 29: Bài thực hành 7 mẫu hỏi trên nhiều bảng

    Lượt xem Lượt xem: 2153 Lượt tải Lượt tải: 0

  • docĐề kiểm tra 15 phút

    Lượt xem Lượt xem: 2022 Lượt tải Lượt tải: 2

Copyright © 2025 Lop11.com - Giáo án điện tử lớp 11, Thư viện giáo án hay, Luận văn

Facebook Twitter

Từ khóa » Viết Phương Trình Pascal Lớp 11