tuyển tập 61 bài tập pascal cơ bản

... Trang 1Bài tập pascal cơ bản dành cho hs-svthiết kế bởi: Vũ Đức Quang for i:=1 to n do begin if i mod 2=0 then ... readlnCó thể biến đổi đề bài của bài toán đi như: tính số phibonaci thứ n hoặc nhập vào 1 số kiểm tra xem số đó có phải là số phibonaci hay không…Các bài đó làm tương tự .Bài 19: Nhập số nguyên ... readlnEND .Bài 14:Nhập vào 1 xâu kí tự và cho biết xâu vừa nhập vào có bao nhiêu nguyên âm và bao nhiêu kí tự số.Lời giải:uses crt;var s:string;dem1,dem2,i:byte;BEGINTrang 8Bài 15:Lập trình giải bài

Ngày tải lên: 23/10/2013, 20:15

... trinh co nghiem: x[...]... ',c(n,k):6:0); Readln; End Bài 29: Lập tam giác PASCAL, bằng 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 ... C:=gt(n)/(gt(k)*gt(n-k)); End; Begin Clrscr; Writeln('VIET TAM GIAC PASCAL: '); Writeln(' -'); Write('... Writeln; End; Readln; End Bài 30: Viết các chương trình con tính diện tích tam giác, tròn, ... Writeln('Dien tich hinh tron la:',dt:6:2); Writeln('Chu vi hinh tron la:',cv:6:2); Readln; End Bài : Tính tam giác: Nụâp vào ba số a,b,c Kiểm tra xem độ dài ba cạnh hay không, không in hình '

Ngày tải lên: 15/11/2015, 11:07

... Bài 1: Với số thực x nhập vào từ bàn phím tính tổng sau: TONG = − x3 x6 x9 x 3n + − + + (−1) n ... ',S:0:3); WRITE('BAN CO MUON TIEP TUC KHONG? (C/K): '); READLN(CHON); UNTIL UPCASE(CHON)='K'; END Bài 2: Cho dãy số un mà phần tử xác định sau: xn un = n! un = ( x − 1) n n! Nếu n lẽ Nếu n chẵn ... ELSE BEGIN T2:=T2*((X-1)/N); S2:=S2+T2; END; INC(N); END; WRITE('S = ',S1+S2:0:3); READLN; END BÀI 3: Cho hai số tự nhiên k, n (kA[K,J] THEN BEGIN TG:=A[K,I]; A[K,I]:=A[K,J]; A[K,J]:=TG; END;

Ngày tải lên: 07/01/2020, 15:25

... số tập Pascal từ đến phức tạp mà Quantrimang.com tổng hợp lại, hy vọng việc học bạn dễ dàng đơi chút Bài tập Pascal có giải Bài 1: In số chẵn hình Bài 2: Tính, in tổng, hiệu, tích, thương số Bài ... khơng Bài 4: Giải phương trình bậc Bài 5: Kiểm tra số chẵn lẻ, ngun tố, hồn hảo Bài 6: Tính ăn bậc n số Bài 7: Tỉnh tổng chữ số số Bài 8: Hoán vị số Bài 9: In bội Bài 10: In tổng chữ số số Bài ... nguyên tố Bài 12: Kiểm tra số hoàn hảo Bài 13: Kiểm tra số phương Bài 14: Đếm nguyên âm, số chuỗi Bài 15: Kiểm tra số có độ dài cạnh tam giác không Bài 16: Đếm số theo điều kiện tính tổng Bài 17:

Ngày tải lên: 04/07/2020, 20:33

... * Tập H chứa chữ hoa * Tập S chứa chữ số * Tập C chứa kí tự cịn lại c) Đưa hình số lượng phần tử liệt kê phần tử tập hợp 6.3 Tìm số ngun tố khơng vượt N (N < 255) sàng Eratosthene với tập ... kiểu liệu tập hợp số nguyên dương, với phép tính: a) Kiểm tra phần tử có thuộc tập hợp hay khơng b) Kết nạp phần tử vào tập hợp loại bỏ phần tử khỏi tập hợp c) Tìm phần hợp, giao, bù hai tập hợp ... KIỂU TẬP HỢP (SET) (10)6.2 a) Nhập số nguyên dương N (N < 30) Nhập từ bàn phím N kí tự, cho khơng có hai kí tự trùng Nếu gõ trùng thơng báo kí tự có b) Phân N kí tự nói vào tập con: * Tập

Ngày tải lên: 28/04/2021, 14:20

... Các tập Pascal bản, KINH ĐIỂN, khó, RẤT KHÓ & RẤT THÚ VỊ (Đặc biệt phần GRAPHIC phần GRAPH THEORY ) PHẦN I- CÁC BÀI TOÁN CƠ BẢN A/ LẬP TRÌNH KHƠNG DÙNG CẤU TRÚC ... Ans In ['n','N']; End 8- (BÀI TOÁN NGƯỢC CỦA BÀI 7) Lập trình cho viết số Thập Phân tương ứng số La Mã đọc từ bàn phím vào Ví dụ vào: MMXVII, ra: 2017 (BÀI NÀY KHĨ HƠN BÀI TRÊN) Program LaMa_ThapPhan; ... Readln; End 3-Không dùng cấu trúc nào, so sánh hai số đọc từ bàn phím vào Thầy Trần Thông Quế (Bài kiểm tra hiểu biết hs cách dùng toán tử gán đồng thời với toán tử quan hệ dòng lệnh) Uses crt;

Ngày tải lên: 20/05/2021, 02:07

... Các tập Pascal bản, KINH ĐIỂN, khó, RẤT KHÓ & RẤT THÚ VỊ (Đặc biệt phần GRAPHIC phần GRAPH THEORY ) PHẦN I- CÁC BÀI TOÁN CƠ BẢN A/ LẬP TRÌNH KHƠNG DÙNG CẤU TRÚC ... Ans In ['n','N']; End 8- (BÀI TOÁN NGƯỢC CỦA BÀI 7) Lập trình cho viết số Thập Phân tương ứng số La Mã đọc từ bàn phím vào Ví dụ vào: MMXVII, ra: 2017 (BÀI NÀY KHĨ HƠN BÀI TRÊN) Program LaMa_ThapPhan; ... sach:',so1+so2+so3+so4); Readln; End 3-Không dùng cấu trúc nào, so sánh hai số đọc từ bàn phím vào (Bài kiểm tra hiểu biết hs cách dùng toán tử gán đồng thời với toán tử quan hệ dịng lệnh) Thầy Trần

Ngày tải lên: 20/05/2021, 02:07

... Bài tập Pascal có giải Bài 1: In số chẵn hình Bài 2: Tính, in tổng, hiệu, tích, thương số Bài 3: Kiểm tra xem tam giác có cân, vng khơng Bài 4: Giải phương trình bậc Bài 5: Kiểm tra ... tố, hồn hảo Bài 6: Tính ăn bậc n số Bài 7: Tỉnh tổng chữ số số Bài 8: Hoán vị số Bài 9: In bội Bài 10: In tổng chữ số số Bài 11: Kiểm tra số nguyên tố Bài 12: Kiểm tra số hoàn hảo Bài 13: Kiểm ... số phương Bài 14: Đếm nguyên âm, số chuỗi Bài 15: Kiểm tra số có độ dài cạnh tam giác không Bài 16: Đếm số theo điều kiện tính tổng Bài 17: Tìm giá trị lớn số Bài 18: Xem ngày thứ tuần Bài 19:

Ngày tải lên: 24/10/2021, 16:32

... b:=tam; writeln(‘gia tri a=’,a); writeln(‘gia tri b=’,b); readln; end Bài 6: Viết chương trình nhập số a b Tìm giá trị lớn nhỏ số Bài 7: Viết chương trình nhập số từ bàn phím, tìm số lớn số đó, in ... s:=sqrt(p*(p-a)*(p-b)*(p-c)); writeln(‘chu vi=’,cv:9:2); writeln(‘dien tich=’,s:9:2); readln; end Bài 5: Viết chương trình nhập vào hai số a, b sau hoán đổi giá trị hai số var a,b,tam:integer; begin ... max:=a; if b>max then max:=b; if c>max then max:=c; writeln(‘so lon nhat la:’,max); readln; end Bài 8: Viết chương trình nhập vào số N Kiểm tra N chẵn hay lẻ var N:Integer; begin write(‘nhap N):’);readln(N);

Ngày tải lên: 07/08/2022, 07:48