//
you're reading...
Chủ đề xâu (string), Dùng cho cấp THCS, Dùng cho cấp THPT

Bài tập về xâu (string) – Bài 04

Bài tập về xâu (string)

Trang này của Nguyễn Công Tác

Bấm vào các liên kết dưới đây để xem các trang liên quan:


Lý thuyết bài 10 – Kiểu xâu (string)
Đến trang sau – Bài 05
Về trang trước – Bài 03


Bài 04:

Nhập vào một số thập phân (hệ 10) và một số nguyên k>=2, in ra màn hình kết quả chuyển đổi số đã cho sang hệ k phân (hệ k).

Phần mã sẽ được trình bày trong vùng màu xám như dưới đây:


Mẫu chương trình


Program Doi_thap_phan_ra_he_bat_ky;
Var
 He10,N,Y,HeN:Word;
 He,Tam:String;
Begin
 Writeln('DOI SO TU HE THAP PHAN SANG HE BAT KY');
 Writeln(' -----------------');
 Writeln;
 Write('-Nhap so nguyen he thap phan: ');
 Readln(He10);
 N:=He10;
 Write('-Doi sang he nao: ');
 Readln(HeN);
 He:=' ';
 Repeat
 Y:=He10 Mod HeN;
 If Y < 10 Then
 Str(Y, Tam)
 Else
 Tam:=Chr(Y+55);
 He:=Tam + He;
 He10:= He10 Div HeN;
 Until He10 = 0;
 Writeln;
 Writeln('+So he 10 la : ',N);
 Writeln('+Doi sang he: ',HeN:2,' la: ',He);
 Writeln;
 Writeln(' Bam phim de ket thuc');
 Readln
End.

Kết quả in ra
DOI SO TU HE THAP PHAN SANG HE BAT KY
-Nhap so nguyen he thap phan: 15
-Doi sang he nao: 6
+So he 10 la : 15
+Doi sang he: 6 la: 23
Bam phim de ket thuc


Nguồn tài liệu

Tham khảo từ Internet.


Giải thuật và lập trình – Lê Minh Hoàng
Trang bài học Pascal cơ bản
Dự phòng
Dự phòng

About pascalteacher

Trang thông tin Toán học và Tin học

Thảo luận

Chưa có phản hồi.

Gửi phản hồi

Mời bạn điền thông tin vào ô dưới đây hoặc kích vào một biểu tượng để đăng nhập:

WordPress.com Logo

Bạn đang bình luận bằng tài khoản WordPress.com Log Out / Thay đổi )

Twitter picture

Bạn đang bình luận bằng tài khoản Twitter Log Out / Thay đổi )

Facebook photo

Bạn đang bình luận bằng tài khoản Facebook Log Out / Thay đổi )

Google+ photo

Bạn đang bình luận bằng tài khoản Google+ Log Out / Thay đổi )

Connecting to %s

Các tác giả

Danh mục

Tháng Mười Hai 2014
M T W T F S S
« Nov   Jan »
1234567
891011121314
15161718192021
22232425262728
293031  

NCT Computer

Flickr Photos

Livin' on an Island

A better future...

The Last Hurrah

More Photos

Thống kê

  • 95,498 lượt xem

pascalteacher.nct@gmail.com


Trang huấn luyện học sinh giỏi Tin học

%d bloggers like this: