VCT nhập vào xâu S đếm các từ trong xâu

VCT nhập vào xâu S đếm các từ trong xâu

VCT nhập vào xâu S đếm các từ trong xâu

Ôn tập Hằng

Hằng là một đại lượng không đổi trong quá trình thực hiện chương trình. Có hai loại hằng là hằng chuẩn và hằng do người dùng định nghĩa.

– Hằng chuẩn là hằng do Pascal định sẵn, ví dụ hằng số PI, hằng số chỉ màu RED=4,…

Người sử dụng không cần định nghĩa lại nếu thấy không cần thiết. Các hằng này được Pascal định nghĩa sẵn trong các Unit. Cần tham khảo hướng dẫn (help) đối với mỗi Unit để biết trong Unit có các hằng nào đã được định nghĩa..

– Hằng do người dùng định nghĩa thông qua việc khai báo.

Cú pháp:

CONST <ten_hang_1>=<gia_tri_hang_1>;

<ten_hang_n>=<gia_tri_hang_n>;

Ví dụ:

CONST a=5;

ch=’Q’;

Bài giải

Program Dem_kytu;

uses crt;
    var str:string[100];
    chu:array[#1..#254] of integer;
    i:integer;
    ch:char;
    
begin
    clrscr;
    
    for ch:=#1 to #254 do chu[ch]:=0;
    
    write(' Nhap chuoi = ');readln(str);
    
    for i:=1 to length(str) do
    
    (chu[upcase(str[i])]):=chu[upcase(str[i])] +1;
    
    writeLn('Cac ki tu trong xau la:');
    
    for ch:=#1 to #254 do
    
    if chu[ch]>0 then writeln(ch, ': xuat hien ',chu[ch],' lan');
    
    readln;
end.

Hình minh họa

dem tu

Bạn thấy bài viết này như thế nào?: 
No votes yet
Ảnh của Tommy Tran

Tommy owner Express Magazine

Drupal Developer having 9+ year experience, implementation and having strong knowledge of technical specifications, workflow development. Ability to perform effectively and efficiently in team and individually. Always enthusiastic and interseted to study new technologies

  • Skype ID: tthanhthuy

Bình luận (0)

 

Add Comment

Plain text

  • No HTML tags allowed.
  • Các địa chỉ web và email sẽ tự động được chuyển sang dạng liên kết.
  • Tự động ngắt dòng và đoạn văn.
CAPTCHA
This question is for testing whether or not you are a human visitor and to prevent automated spam submissions.
10 + 9 =
Solve this simple math problem and enter the result. E.g. for 1+3, enter 4.

Advertisement

 

jobsora

Dich vu khu trung tphcm

Dich vu diet chuot tphcm

Dich vu diet con trung

Quảng Cáo Bài Viết

 
Chiến lược Seo quyết định thứ hạng cao

Chiến lược Seo quyết định thứ hạng cao

Chúng ta đã biết 4 thành tố quan trọng nhất trong thứ hạng từ khóa đó là “Tứ trụ trong Seo” bao gồm điều hướng Onpage,

Headless Drupal? 6 Resources quan trọng cần biết

Headless Drupal? 6 Resources quan trọng cần biết

It's a big upgrade, no question. If you're like me, however, you may prefer a completely custom frontend crafted out of HTML, CSS and JavaScript

5 Ứng dụng web có thể triển khai không cần code

Drupal Vietnam: 5 Ứng dụng web drupal có thể triển khai

Với những công cụ hỗ trợ ưu việt trong công nghệ ngày nay thì có và chạy được một site Drupal đầy đủ tính năng không còn gì là khó khăn nữa.

Tomdesgin.vn

 

Drupal Services