... Một văn có tên BL.PAS chứa chương trình Pascal hoàn chỉnh Trong chương trình dòng chứa nhiều lệnh Em viết chương trình in file có tên BLMOI.PAS chương trình Pascal cho thỏa mãn điều kiện lệnh phải ... Writeln(ht[i],t[i]:4,xl[i]:3); Readln; End 11 Thực tất thao tác với dạng file văn phần Câu hỏi, ví dụ, tập theo chiều ngược lại, tức thực thao tác ghi (Bai 1) Var f:text; m,n:integer; Begin m:=10; n:=4;...
... PHANTICH(n); Readln; End BÀITẬP TỰ GIẢI Bàitập 4.7: Viết hàm tìm Max , số thực Bàitậ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àitập 4.9: Viết ... Const n: Sn; ELSE Sn+1; END; Trong đó: B: Biểu thức kiểu vô hướng đếm kiểu nguyên, kiểu logic, kiểu ký tự, kiểu liệt kê 15 Giáo trình tậpPascal Const i: Hằng thứ i, giá trị hằng, giá trị (phân ... ** ** ** ******** ******** Giáo trình tậpPascal Chương CÁC KIỂU DỮ LIỆU CƠ BẢN KHAI BÁO HẰNG, BIẾN, KIỂU, BIỂU THỨC VÀ CÂU LỆNH I CÁC KIỂU DỮ LIỆU CƠ BẢN Kiểu logic - Từ khóa: BOOLEAN - miền...
... nhiên, màu ngẫu nhiên BÀITẬP MÔN: NGÔN NGỮ LẬP TRÌNH (PASCAL) (Kể từ tập sinh viên cần giải tập theo tiến độ học lý thuyết – không đặt mốc thời gian Cố gắng giải xong tập trước thi kết thúc ... BÀITẬP MÔN: NGÔN NGỮ LẬP TRÌNH (PASCAL) (Bài – tiết) Các thủ tục/hàm học: Textmode(), Textcolor(), TextBackGround(), ... bao gồm hai field: field có liệu kiểu DataType, field trỏ trỏ đến nút Hãy tạo danh sách hai cách cho xử lí được: 1) Theo kiểu LIFO (Last In First Out) 2) Theo kiểu FIFO (First In First Out) b)...
... 28 Bàitập ngôn ngữ lập trình PasCal Readln; END Biên soạn: Hoàng Đức Hà 29 Bàitập ngôn ngữ lập trình PasCal Biên soạn: Hoàng Đức Hà Bàitập chơng Bài : Bạn viết hàm Card(A) đếm số phần tử tập ... : ', a[n] ) ; Readln ; 11 Bàitập ngôn ngữ lập trình PasCal END Biên soạn: Hoàng Đức Hà 12 Bàitập ngôn ngữ lập trình PasCal Biên soạn: Hoàng Đức Hà Bàitập chơng Bài : Dùng thủ tục chuyển số ... Readln(a[i, j]); 23 Bàitập ngôn ngữ lập trình PasCal a[j,i]:=a[i,j]; End; Readln ; END ; Biên soạn: Hoàng Đức Hà 24 Bàitập ngôn ngữ lập trình PasCal Biên soạn: Hoàng Đức Hà Bàitập chơng Bài : Lập trình...
... không cho ký tự lên mà dấu ‘*’ kiểu mật Hỏi có mật không có xuất mật vừa nhập uses crt; var s:string; ch,tl:char; Begin clrscr; write('Nhap mat khau:'); BàitậpPascal BỒI DƯỢNG HỌC SINH GIỎI ... a[i]:=random(1000); for i:=1 to n-1 for j:=i+1 to n if a[i]
... bcbsaaba b3 BÀI 4: TỪ DÀI NHẤT In từ dài xâu nhập từ bàn phím số ký tự từ này? Nếu có nhiều từ có độ dài in hết ví dụ: Input Output Nguyen van truong truong Truong thich hoc pascal Truong pascalBÀI ... (n6) Bài tốn: Cho trước số hạng dãy 6174 Cho biết số số hạng cuối (là số hạng 6174) dãy Dữ liệu: Cho tập tin văn DL6174.INP, gồm dòng gồm số ngun dương số hạng dãy số 6174 Kết quả: Cho tập tin ... Input 43528796 BÀI 6: XOÁ KÝ TỰ TRÙNG Output 879 Viết chương trình nhập vào xâu xoá hết ký tự liên tiếp giống xâu chừa lại một? Input cccccaaannnnooo Output cano yeseeeyysss yeseys BÀI 7: SỐ ĐƠN...
... Bàitập 3: Viết chương trình nhập vào dãy số nguyên (a) n (b)m, m≤n Kiểm tra xem dãy {b} có phải dãy dãy {a} không? Bàitập 4: Viết chương trình nhập vào dãy ... A[n,n] Bài 10: Tìm phần tử cảu ma trận vuông MIN MAX phần tử nằm đường chéo Bài 11: Viết chương trình xếp phần tử ma trận vuông A[n,n] cho phần tử tăng dần theo đường zigzag hình vẽ Bàitập 11: ... lại theo thứ tự tăng dần tổng phần tử dòng Bài 6: Tìm điểm cực tiểu mảng hai chiều Một phần tử gọi điểm cực tiểu mảng chiều A[m.n] không lứon phần tử kề Bài 7: Tìm " Phần tử yên ngựa" cuả mảng hai...
... Bàitập 3: Viết chương trình nhập vào dãy số nguyên (a) n (b)m, m≤n Kiểm tra xem dãy {b} có phải dãy dãy {a} không? Bàitập 4: Viết chương trình nhập vào dãy ... A[n,n] Bài 10: Tìm phần tử cảu ma trận vuông MIN MAX phần tử nằm đường chéo Bài 11: Viết chương trình xếp phần tử ma trận vuông A[n,n] cho phần tử tăng dần theo đường zigzag hình vẽ Bàitập 11: ... lại theo thứ tự tăng dần tổng phần tử dòng Bài 6: Tìm điểm cực tiểu mảng hai chiều Một phần tử gọi điểm cực tiểu mảng chiều A[m.n] không lứon phần tử kề Bài 7: Tìm " Phần tử yên ngựa" cuả mảng hai...
... Một văn có tên BL.PAS chứa chương trình Pascal hoàn chỉnh Trong chương trình dòng chứa nhiều lệnh Em viết chương trình in file có tên BLMOI.PAS chương trình Pascal cho thỏa mãn điều kiện lệnh phải ... Writeln(ht[i],t[i]:4,xl[i]:3); Readln; End 11 Thực tất thao tác với dạng file văn phần Câu hỏi, ví dụ, tập theo chiều ngược lại, tức thực thao tác ghi (Bai 1) Var f:text; m,n:integer; Begin m:=10; n:=4;...
... bcbsaaba b3 Bài 11: Từ dài In từ dài xâu nhập từ bàn phím số ký tự từ này? Nếu có nhiều từ có độ dài in hết ví dụ: Input Output Nguyen van truong truong Truong thich hoc pascal Truong pascalBài 12: ... lan nao 9999999 Bài : Sắp số xâu Nhập xâu s bao gồm số kí tự, in xâu xếp số theo thứ tự tăng dần vò trí kí tự giữ nguyên? Input Output abc6ghj7kkkkk1hhhh9 abc6ghj7kkkkk1hhhh9 Bài 10: KÝ TỰ NHIỀU ... dơ: (A) = (1 3 1) Th«ng b¸o: SO HANG XUAT HIEN NHIEU NHAT LA SO: VI TRI TUONG UNG TRONG DAY LA: Bài : XẾP GẠCH Minh thích trò chơi xếp hộp có hình viên gạch Minh đặt viên gạch chồng lên xây thành...