Nguồn đề bài: http://www.spoj.com/PTIT/problems/PTIT124J/
Nội dung bài viết
1. Đề bài PTIT124J spoj
Cho một số ở hệ nhị phân, chuyển số đó sang hệ bát phân
Input
Một số duy nhất ở hệ nhị phân (không quá 100 chữ số, chữ số đầu tiên luôn là 1)
Output
Số sau khi chuyển sang hệ bát phân.
Example
Input:
1010
Output:
12
Input:
11001100
Output:
314
Điều hiển nhiên, kết quả khi chuyển từ hệ nhị phân sang hệ bát phân như sau:
000 –> 0
001 –> 1
010 –> 2
011 –> 3
100 –> 4
101 –> 5
110 –> 6
111 –> 7
từ đó ta chuyển về bài toán thay thế xâu là được
2. code mẫu PTIT124J spoj
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 | const fi=''; nmax=102; type data=longint; var f:text; S:ansistring; function doi(s:string):data; begin case s of '000': exit(0); '001': exit(1); '010': exit(2); '011': exit(3); '100': exit(4); '101': exit(5); '110': exit(6); '111': exit(7); end; end; procedure xuli; var i,j:data; begin while length(s) mod 3 <>0 do s:='0'+s; while length(s)<>0 do begin write(doi(copy(s,1,3))); delete(s,1,3); end; end; begin assign(f,fi); reset(f); readln(f,s); close(f); xuli; end. |
keywords: chuyển hệ nhị phân sang bát phân pascal. chuyển đổi hệ cơ số 2 sang 8
Bài viết liên quan
- Ước chung lớn nhất, bội chung nhỏ nhất (Cơ bản)
- BCMULONE spoj PTIT -Nhân 1
- NK2MFS Spoj – Lập lịch trên hai máy
- TWO Spoj – Lập lịch trên hai máy
- P146PROG spoj PTIT – Cuộc thi ăn socola
- P145PROD spoj PTIT – Diện tích hình tròn
- P142PROC spoj PTIT – Tập chơi cờ vua
- P141SUMB spoj PTIT – ROUND 1B – Hoán vị
- P134SUMF spoj PTIT – SUM4 F – Sàng nguyên tố
- P134SUMB spoj PTIT – SUM4 B – Lát sàn