Viết chương trình cho phép đổi một số từ cơ số 10 sang cơ số bất kỳ

Viết chương trình cho phép đổi một số từ cơ số 10 sang cơ số bất kỳ

Viết chương trình cho phép đổi một số từ cơ số 10 sang cơ số bất kỳ.

Thuật toán:

  • Dùng mảng CS để lưu các chữ số.
  • Lặp khi n <> việc: Chia n cho s lấy phần dư. Lấy phần dư làm chỉ số để lấy và lưu chữ số. Gán n = n div s.
  • Chú ý chữ số lấy sau sẽ nằm trước.
Program Doi_co_so;

Var n,s: longint;

Function D10_CS(n:longint;s:byte):string;

Var CS: array[0..100] of char;

    i: integer;

    ch:Char;

    Tam:string;

Begin

{Khoi tao cac chu so 0 den 9}

    i:=0;

    ch:='0';

    while i<=9 do

    Begin

        CS[i]:=Ch;

        inc(i);

        inc(ch);

    End;

{Khoi tao cac chu so A den Z}

    i:=10;

    ch:='A';

    While ch<'Z' do

    Begin

         CS[i]:=ch;

         inc(i);

         inc(ch);

    End;

    tam:='';

    While n<>0 do

    Begin

        tam:= CS[n mod s]+ Tam;

        n:=n div s;

    End;

    D10_CS:=Tam;

End;


Begin

   Write('Nhap n:');Readln(n);

   Write('Doi sang co so: ');Readln(s);

   Write(D10_CS(n,s));

   Readln

End.

 

Bạn thấy bài viết này như thế nào?: 
Average: 9.4 (18 votes)
Ả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

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

 
SEO Audit sẽ giúp cho bạn biết được những công việc cần phải thực hiện

SEO Audit sẽ giúp cho bạn biết được những công việc cần phải thực hiện

Hãy tưởng tượng, một sáng nào đó bạn thức dậy, trong người uể oải, đau nhức khắp người, nhớ đêm qua còn khoẻ

 eCommerce Store với Drupal

Các vấn đề cơ bản để xây dựng eCommerce Store với Drupal

In this article you will learn which steps to take to get your country specific e-Commerce store up and running in Drupal - in just 30 to 60 minutes of your time (even faster if you've done this before).

Sự khác biệt giữa hosting Linux và Windows

Sự khác biệt giữa hosting Linux và Windows

Trước đây, giữa hosting (dịch vụ lưu trữ) Linux và Windows luôn có một sự khác biệt rất lớn.

Tomdesgin.vn

 

Drupal Services