Một Số Bài Tập Pascal Lớp 11
Có thể bạn quan tâm
- Trang Chủ
- Đăng ký
- Đăng nhập
- Upload
- Liên hệ

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.
minh_thuy
11329
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:
mot_so_bai_tap_Pascal_hay_lop_11.doc
Giáo án môn Tin học khối 11 - Tiết 20 đến tiết 50
Lượt xem: 1979
Lượt tải: 2
Giáo án Tin học 11 - Bài 2: Các thành phần của ngôn ngữ lập trình (tiết 2)
Lượt xem: 3326
Lượt tải: 1
Giáo án môn Tin học khối 11 - Hệ cơ sở dữ liệu quan hệ - Bài tập và thực hành 10
Lượt xem: 2097
Lượt tải: 0
Giáo án Tin học 11 - Bài 3: Các thành phần cơ bản của ngôn ngữ
Lượt xem: 1939
Lượt tải: 0
Bài giảng Tin học 11 - Bài 22: Nhập, tìm và thay thế nhanh dữ liệu
Lượt xem: 3734
Lượt tải: 0
Giáo án môn Tin học 11 - Trường THPT bán công Trần Hưng Đạo
Lượt xem: 1712
Lượt tải: 1
Bài 3: Cấu trúc chương trình + Bài 4: Một số kiểu dữ liệu chuẩn
Lượt xem: 1101
Lượt tải: 0
Giáo án môn Tin học 11 - Bài tập và thực hành 4
Lượt xem: 2806
Lượt tải: 5
Bài tập ôn tập Tin học 11 (Kết nối tri thức) - Bài 6: Lưu trữ và chia sẻ tệp tin trên Internet
Lượt xem: 26
Lượt tải: 0
Giáo án Thể dục 10 - Trần Đính
Lượt xem: 1898
Lượt tải: 0
Copyright © 2025 Lop11.com - Giáo án điện tử lớp 11, Thư viện giáo án hay, Luận văn
Từ khóa » Viết Chương Trình Pascal Lớp 11 Học Kì 1
-
Viết Chương Trình Pascal Lớp 11 Cơ Bản Hay Nhất - TopLoigiai
-
61 Bài Tập Pascal Cơ Bản
-
Bài Tập Pascal Cơ Bản đến Nâng Cao Theo Chương Trình Tin Học Lớp ...
-
Bai Tap-pascal-lop-11 - SlideShare
-
Cách Viết Phương Trình Pascal – Lý Thuyết Và Bài Tập Viết Chương ...
-
Cách Viết Chương Trình Pascal Lớp 11 Bài 3
-
Viết Chương Trình Pascal Tính Trung Bình Học Kì 1 Môn Tin Học Gồm 1 ...
-
Bài Tập Viết Chương Trình Pascal Lớp 11 - Trần Gia Hưng
-
Học Lập Trình Pascal Lớp 11
-
Viết Chương Trình Pascal Nhập Vào điểm Trung Bình Các Môn Học ...
-
Đề Thi Tin Học Lớp 11 Học Kì 1 Có đáp án (4 đề)
-
Đề Thi Tin Học Lớp 11 Giữa Học Kì 1 Có đáp án (4 đề)
-
Tổng Hợp Bài Tập Pascal Có Giải, Từ Dễ đến Khó