... B1 xóa các kí tự trắng ở đầu và cuối chuỗi while s[1]=' ' do delete(s,1,' '); while s[length(s)]=' ... inc(d); write('Xau co so tu la:',d); Readln End. B3 Lập trình nhập vào một xâu từ bàn phím. Hãy biến đổi xâu đã cho bằng cách thay đổi tấ cả các dấu chấm liền nhau bằng được thay bằng một ... inc(k); end else begin i:=i+k-1; {s1[p,k]:='\0';} {Khong nho ky tu ket thuc xau trong pascal la gì :( } dec(p); break; end; end; inc(p); end; end; var n,i:integer; s2:xaukep; BEGIN tachtu('Chuong...
Ngày tải lên: 19/08/2013, 09:35
bai tap pascal ve xau
... Readln; End. BÀI TẬP TỰ GIẢI Bài tập 6.11: Viết chương trình nhập vào một xâu ký tự từ bàn phím. Tìm và in ra màn hình một từ có độ dài lớn nhất trong xâu. Gợi ý:Tách từng từ để so sánh (xem bài tập ... tổng 2 số lớn (xem bài tập 10). Bài tập 6.18: Viết chương trình để nén và giải nén một xâu ký tự . Ví dụ: Xâu ‘AAAABBBCDDDDDDDEEF’ sau khi nén sẽ trở thành ‘4A3BC7D2EF’. Bài tập 6. 19 : Viết chương ... 1 to m do write(g,S[i]:0:2,#32); close(g); End. Chú ý: 9 BÀI TẬP VỀ XÂU Bài tập 6.1: Viết chương trình liệt kê các từ của một xâu ký tự được nhập vào từ bàn phím, mỗi từ phải được viết trên...
Ngày tải lên: 29/04/2014, 10:45
... bài tập lớn Automata Đề bài : 2 DFA tương đương A và C là cặp trạng thi tương đương, vậy hai DFA là tương đương. Tức là chúng cùng thừa nhận một ngôn ngữ. 19 Báo cáo bài tập lớn Automata Đề bài ... C Báo cáo bài tập lớn Automata Đề bài : 2 DFA tương đương DFA giao của hai DFA Chúng ta dễ dàng nhận thấy rằng, DFA thừa nhận ngôn ngữ gồm it nhất một kí hiệu 0 và ít nhất một kí hiệu 1. DFA ... B Báo cáo bài tập lớn Automata Đề bài : 2 DFA tương đương Ta có thể mô tả quá trình đoán nhận xâu vào của ôtômat hữu hạn đơn định đầy đủ A bằng thuật toán mô phỏng sau: Đầu vào: − Một xâu ω...
Ngày tải lên: 27/03/2014, 11:00
Bài thực hành số 5: Làm việc với xâu kí tự
... nếu gõ BS JNE else1 ;không phải lưu chuỗi DEC DI ;ngược lại lùi 1 kí tự DEC BX ;giảm kích thước chuỗi JMP read ; đọc kí tự khác else1: STOSB INC BX read: INT 21H JMP while1 end_while1: ... tại ES:DI, sau đó tăng (hoặc giảm) SI và DI 1 (hoặc 2) đơn vị. Bài tập 1. VCT nhập một chuỗi kí tự và in ra chuỗi theo thứ tự ngược lại. In chiều dài chuỗi. Ví dụ : Nhập chuỗi : abcd Chuỗi ... Nhập một chuỗi kí tự tính tần số xuất hiện của các nguyên âm. Ví dụ : Nhập chuỗi : Thanh Chi Khang Số lần xuất hiện của các nguyên âm là: 3 4. VCT nhập hai chuỗi, liệt kê các kí tự có mặt trong...
Ngày tải lên: 24/10/2013, 19:15
xâu kí tự (String) Trong pascal
... nghĩa xâu kí tự (String) Xâu kí tự có thể hiểu đơn giản là một mảng một chiều có kiểu phần tử là các kí tự (CHAR). Nhng xâu kí tự chỉ có thể có tối đa 255 kí tự nhng nó có các lệnh xử lí xâu nh ... hàm chuẩn xử lí xâu kí tự 1. Length (St) Hàm cho ta độ dài của xâu kí tự St VD : l := length(st); 2. Delete (St, Pos, Num) Thủ tục xoá đi Num kí tự kể từ vị trí Pos trong xâu St VD : S ... với xâu kí tự VD : readln(st); Writeln(st); 1 Bài 9:{ Đọc một chuỗi kí tự. In ra màn hình chuỗi kí tự đó a. Căn trái màn hình b. Căn phải màn hình c. Căn giữa màn hình} var s:string;{Xâu...
Ngày tải lên: 04/11/2013, 20:15
Bài tập TN về cọnunction và vài cấu trúc cơ bản của Tuấn AVHN3
... GV: Huỳnh Quang Minh Tuấn Trang 1 BÀI TẬP VỀ LIÊN TỪ VÀ VÀI CẤU TRÚC CƠ BẢN 1. It’s obvious that neither workers ________to fight the...
Ngày tải lên: 07/11/2013, 20:11
Tuyển chọn bài tập Pascal - Lớp 11
... Trang 1 Bài tập pascal cơ bản đến nâng cao theo chương trình TIN HỌC lớp 11 không phân ban Nhằm giúp các bạn học sinh lớp 11 tiếp cận với ngôn ngữ lập trình Pascal một cách dễ dàng ... Văn Chung trường THPT Hoàng Văn Thụ Nha Trang ĐT: 0972.311.481 Trang 2 Phần I: CÁC BÀI TẬP CƠ BẢN Bài 1: Tìm giá trị lớn nhất trong 4 số a, b, c, d (a, b, c, được nhập từ bàn ... một số bài toán cơ bản đến nâng cao có trong chương trình của lớp 11 không phân ban. Các chương trình nhằm mục đích tham khảo cho các bạn ham mê tin học và là tài liệu chuẩn bị cho các bài kiểm...
Ngày tải lên: 08/05/2014, 17:03
Bài tập quản trị thương mại : Tự vệ thương mại
... GIẢI BÀI TẬP QUẢN TRỊ THƯƠNG MẠI Bài số 1: Hãy tính hệ số co dãn của cầu theo giá cả , cho đường cầu có dạng P= 60- ... 360/2400 = 360 (bóng) Bài số 20: 13 Như vậy, nếu thời gian để tiếp nhận gỗ và chuẩn bị để đưa vào sản xuất của công ty là 7 ngày. Thì dự trữ chuẩn bị về gỗ là 210 ngày. Bài số 24: Tình hình ... sản xuất là: 500000/45 = 11112 (máy) Bài số 19: Một công ty chiếu sáng thành phố có nhiệm vụ phụ trách 200 cột đèn. Một cột đèn có 1 bóng. Xác định nhu cầu về số bóng đèn để công ty thực hiện...
Ngày tải lên: 06/06/2014, 16:52
Giáo trình lý thuật bài tập pascal Chương I
... Writeln('De '); Writeln('Cu '); Readln End. *********0108********* Program Tam_giac _Pascal; Begin Writeln(' 1'); Writeln(' 1 1'); Writeln(' 1 2 1'); ... Write('-Nhap mot so thuc = '); Readln(so_thuc); Writln; GIAO TRINH LY THUYET VA BAI TAP TURBO PASCAL- CHUONG 1 Dang Thanh Tuan(15/3/2004) **********0101********** Program PTB2; Var a,b,c:Integer;...
Ngày tải lên: 17/08/2012, 09:04
Bạn có muốn tìm thêm với từ khóa: