Bài tập Pascal có lời giải

bài tập pascal có lời giải

... Enter de ket thuc!'); Readln; END BÀI TẬP CƠ BẢN BÀI TẬP CƠ BẢN BÀI TẬP CHƯƠNG 3:CHƯƠNG TRÌNH CON Bài :Dùng thủ tục chuyển số tự nhiên n cho trước sang hệ số GIẢI Bài : Một file ghi chứa danh sách ... Trung_tuyen(a, b, c); Readln; END BÀI TẬP CƠ BẢN BÀI TẬP CƠ BẢN BÀI TẬP CHƯƠNG 7: KIỂU RECORD Bài :Giải phương trình x + y + z = 12 phạm vi số nguyên không âm với điều kiện x < GIẢI Uses Crt; Var X, Y, ... doi la: ', S); Readln; END BÀI TẬP CHƯƠNG 6: DỮ LIỆU KIỂU TẬP Bài : Bạn viết hàm Card(A) đếm số phần tử tập hợp A cho trước có kiểu Set Of 99 (* hàm đếm số phần tử tập hợp *) Uses Crt; Type Tap=set...

26
3,766
4

BAI TAP PASCAL CO LOI GIAI

... khoi tap hop *) Uses Crt; Var tap: set of char; ch: char; BEGIN tap: =[]; Writeln('Nhap cac phan tu cho mot tap hop cac ki tu: '); Repeat BÀI TẬP CƠ BẢN TRANG 39 BÀI TẬP CƠ BẢN ch:=ReadKey; tap: =tap+ [ch]; ... Writeln('Cac phan tu cua tap hop la:'); For ch:='a' to 'z' If ch in tap then Write(ch,' '); Writeln; Writeln('Ban muon bo cac phan tu nao khoi tap hop:'); Repeat ch:=ReadKey; tap: =tap- [ch]; Writeln(ch); ... file bai3 .dat sang bai3 n.dat:'); Writeln; Assign(f1, 'bai3 .dat'); Reset(f1); Assign(f2, 'bai3 n.dat'); Rewrite(f2); While not Eof(f1) Begin Read(f1,ds1); With ds1 Begin ds2.hoten:=holot+ten; val(copy(lop,1,2),ds2.khoi,c);...

68
4,449
123

Một số bài tập Pascal có lời giải ! docx

... PHANTICH(n); Readln; End BÀI TẬP TỰ GIẢI Bài tập 4.7: Viết hàm tìm Max , số thực Bài tập 4.8: Viết hàm PERFECT(n:Word):Boolean; để kiểm tra số nguyên n có phải số hoàn thiện hay không? Bài tập 4.9: Viết ... kiểu Boolean để kiểm tra số nhập vào có phải số nguyên tố hay không Bài tập 3.23: Viết chương trình nhập vào số nguyên dương Hãy thông báo lên hình số có chữ số tổng chữ số số Gợi ý: Dùng vòng lặp ... tập thi liên thông môn sở ngành - Pascal S0 = n! = 1*2* *n {n giai thừa} S1 = + 1/2 + + 1/n S2 = + 1/ 2! + + 1/n! S3 = + x + x2/ 2! + x3/ 3! + + xn/n! S4 = - x + x2/ 2! - x3/ 3! + + (-1)nxn/n!...

141
4,371
97

TỔNG HỢP, PHÂN LOẠI BÀI TẬP PASCAL CÓ LỜI GIẢI

... trai dau nhau.'); Page 27 TỔNG HỢP, PHÂN LOẠI BÀI TẬP PASCAL CÓ LỜI GIẢI 2015 Readln; End Bài 17:Tam giác Pascal Hãy in hình tam giác Pascal có n dòng tính xem hàng thứ i có số j (với n, i, j nhập ... 47 2015 TỔNG HỢP, PHÂN LOẠI BÀI TẬP PASCAL CÓ LỜI GIẢI 2015 write(lop[i].Dvan, ' '); writeln; end; readln; end Bài 5.Cho tệp văn có tên VANBAN.PAS gồm dòng chứa xâu ký tự S , S2 , S3 có độ dài ... a Hãy tính tổng S = ak - ak - + ak - - + (-1) k + a - Nhập vào số m (m ≤ số chữ số n) Hãy tính tổng m chữ số cuối n uses crt; Page 2015 TỔNG HỢP, PHÂN LOẠI BÀI TẬP PASCAL CÓ LỜI GIẢI var i,k,m,n:longint;...

156
7,242
18

bài tập pascal có lời giải

... Writeln('Tong la: ',s:6:2); Readln; End Bài 36: Giải hệ phương trình: Viết chương trình giải hệ phương trình tuyến tính ẩn dùng ma trận a11.x + a12.y = c1 a21 + a22.y = c2 Bài 37: Hãy viết chương trình ... While not eof(f) Begin read(f,i); write(i:3); End; Readln; End Bài 60: Mở file số nguyên có đĩa, chép nội dung sang tập tin in nội dung tập tin sau chép hình Program COPY_FILE; Trang 37 Uses Crt; ... -'); merge(a,b,c,n,m,l); output(c,l); Readln; End Bài 58: Viết chương trình nhập vào danh sách sinh viên có n người ( sinh viên có họ, tên, tuổi, quê quán) In danh sách sinh viên hình Sắp...

Tổng Hợp 61 Bài Tập Pascal Có Lời Giải

... la: ',s:6:2); Readln; End Bài 36: Giải hệ phương trình: Viết chương trình giải hệ phương trình tuyến tính ẩn dùng ma trận a11.x + a12.y = c1 a21 + a22.y = c2 Type MT = Bài 37: Hãy viết chương trình ... vuông cấp n array[1 a Tính tổng phần tử nằm đường chéo 0,1 20] of b Tính tổng bình phương số nằm hàng chẵn integer; c Tính tổng bậc hai số không âm cột lẻ d Đếm số phần tử có giá trị khoảng [1 5] ... ');readln(k); Writeln('C(',n,',',k,') = ',c(n,k):6:0); Readln; End Bài 29: Lập tam giác PASCAL, Cn k(dùng chương trình con) n Program TAM_GIAC _PASCAL; Uses Crt; Var i,j,n,k:integer; Trang 12 Function gt(n:integer):longint;...

65
1,647
0

Bài tập Pascal có lời giải

... END BÀI TẬP CHƯƠNG 6: DỮ LIỆU KIỂU TẬP Bài : Bạn viết hàm Card(A) đếm số phần tử tập hợp A cho trước có kiểu Set Of 99 (* hàm đếm số phần tử tập hợp *) Uses Crt; Bài tập Pascal có lời giải ... 'z' Bài tập Pascal có lời giải 39 Thầy gửi tài liệu em xem để học (0946873510-Hồng Nam Trung-mientrung19@gmail.com) If ch in tap then Write(ch,' '); Readln; END BÀI TẬP CHƯƠNG 7: KIỂU RECORD Bài ... i > n ; Readln ; END Bài 10 : Viết chương trình nhập dãy số tối đa 50 số in hình số trùng dãy GIẢI Uses crt ; Var a , b : Array[1 50] Of Integer ; Bài tập Pascal có lời giải 10 Thầy gửi tài...

Bài tập QHTT có lời giải

... án tối ưu toán chuẩn Ta có: X* = (20, 0, 20, 50, 0, 0) Bỏ ẩn phụ, ta có phương án tối ưu toán xuất phát: Xmax = (20, 0, 20) với fmax = 140 Từ lời giải này, ta có lời giải toán thực tế sau: Khi ... với tổng chi phí sản xuất thấp 768 triệu đồng Bài tập QHTT LẬP MÔ HÌNH (không yêu cầu giải) Bài Một doanh nghiệp sản xuất bàn ghế để bán Mỗi bàn bán lời 200 ngàn ghế 50 ngàn Theo điều tra thò trường ... + 2x3 xj ≥ (j = 1,5) LẬP MÔ HÌNH VÀ GIẢI BÀI TOÁN QHTT Bài 15 Một doanh nghiệp sản xuất có 1000Kg acid 600Kg chất tẩy màu, nguyên liệu yếu tố sản xuất khác có số lượng lớn, muốn sản xuất hai loại...

8
7,364
202

Bài tập thuế - có lời giải 1

... 3.200 = 15 0268 (tr) Chi phí hợp lý = 10 2.7 31 + 1. 242 + 4968 = 10 8.9 41 (tr) Thu nhập khác: 200 + 680 = 880 (tr) - Thuế TNDN: (15 0.268 – 10 8.9 41 + 880) x 28% = 11 .8 71, 96 (tr) BÀI 18 : Xác định thuế ... đồng - thuế suất thuế xuất 2% - Thuế suất thuế GTGT 10 % - Thuế suất thuế TNDN 28% - Thuế suất thuế TTDB hàng X 30%, rượu 420 65% - Thuế GTGT từ hoạt động mua khác khấu trừ năm 13 0 triệu đồng - Giá ... Vậy: - Thuế xuất phải nộp: 552 + 690 = 1. 242 (tr) - Thuế GTGT phải nộp = T.GTGTđầu – T.GTGTvào * thuế GTGT = 8.000 - 13 .17 3 = -5 17 3 - Thuế TNDN = thu nhập tính thuế x thuế suất * thu nhập tính thuế...

24
2,120
54

BAI TAP NLTK CO LOI GIAI

... sản phẩm giá đơn vị sản phẩm mối liên hệ nghịch chặt chẽ Bài 11: Cho số liệu thống kê GO ngành giai đoạn Năm t ty t2 2004 100 100 2005 120 240 2006 135 405 2007 150 600 16 2008 170 850 25 2009 ... 21 3395 91 Xây dựng hàm xu tuyến tính biểu diễn phát triển GO Tính tốc độ tăng giảm bình quần GO giai đoạn Dự đoán GO ngành vào năm 2010 dựa vào phương án sau: Dự đoán dựa vào lượng tăng tuyệt...

12
1,115
14

Bài tập HIĐROCACBON (có lời giải)

... tích a b 2,3a ⇒ %CH4 = %C3H6 = 6,6a * 100% = 15% %C2H6 = %C2H4 = 6,6a *100% = 6,6a *100% = 35% Bài : Đốt cháy 19,2 g hỗn hợp ankan thu V lít CO2 (0oC, atm) Cho V lít CO2 qua dd Ca(OH)2 thu 30g ... %C2H6 = 19,2 *100% = 19,2 *100% = 31,25% (mol) 44b 44.0,3 % C3H8 = 19,2 *100% = 19,2 *100% = 68,75% Bài : Một hỗn hợp X gồm hydrocacbon liên tiếp thuộc dãy đồng đẳng thể khí đktc Đốt cháy X với 6,4g ... nH2O = x( n +1) = 1,6 x = 0,6 n = 1,67 < n =1,67 < m= n + ⇒ n= m = ⇒ CTPT ankan CH4 C2H6 (mol) Bài : Đốt cháy 560cm3 hỗn hợp khí (đktc) gồm hydrocacbon có số nguyên tử cacbon ta thu 4,4g CO2...

11
13,078
180

BÀI TẬP ĐIỆN CÓ LỜI GIẢI CHI TIẾT

... Hiệu điện hai điểm A v B 6V (Hình 2-5) Điện dung tụ điện thứ C1 = àF v tụ điện thứ hai C2 = 4àF Tính hiệu điện v điện tích tụ điện A D C1 B C2 Hình 2-5 Giải: Gọi q l điện tích tụ điện, ta có: ... Một tụ điện có điện dung C1 = 20àF, hiệu điện hai tụ điện U1 = 100V Ngời ta nối song song với tụ điện thứ hai có hiệu điện hai l U2 = 40 V Xác định điện dung tụ điện thứ hai (C2) biết hiệu điện ... Một tụ điện phẳng có chứa điện môi ( = 6) khoảng cách hai l 0,4cm, hiệu điện hai l 1200V Tính: Cờng độ điện trờng chất điện môi Mật độ điện mặt hai tụ điện Mật độ điện mặt chất điện môi Giải: ...

117
13,774
86

Xem thêm