Lập Trình Pascal: Chuyển Một Số Thập Phân Sang Nhị Phân Và Bát Phân

Trang chủ » Chuyển Từ Hệ 10 Sang Hệ 2 Pascal » Lập Trình Pascal: Chuyển Một Số Thập Phân Sang Nhị Phân Và Bát Phân

Có thể bạn quan tâm

Bài Kiểm Tra © 2020 Bài Kiểm Tra.com. All Rights Reserved. logo 1
  • Trang nhất
  • Tin học
Thứ tư, 17/12/2025, 04:07 Lập trình Pascal: chuyển một số thập phân sang nhị phân và bát phân 2020-01-06T23:11:28+07:00 Hướng dẫn lập trình Pascal:Bài 1: Chuyển 1 số từ hệ thập phân sang nhị phân.Bài 2: Chuyển 1 số từ hệ thập phân sang bát phân. chuyển số từ hệ thập phân sang nhị phân, chuyển số từ hệ thập phân sang bát phân https://baikiemtra.com/uploads/news/2019_11/bai-tap-lap-trinh-pascal.jpg Bài Kiểm Tra Thứ hai - 06/01/2020 23:05
  • In ra
Hướng dẫn lập trình Pascal:Bài 1: Chuyển 1 số từ hệ thập phân sang nhị phân.Bài 2: Chuyển 1 số từ hệ thập phân sang bát phân. Bài 1: Chuyển 1 số từ hệ thập phân sang nhị phân.

Program DOI_THAP_PHAN_SANG_NHI_PHAN; Uses Crt; Var d:array[1..20] of byte; i,j,n:integer; Begin Clrscr; Writeln('DOI SO THAP PHAN SANG NHI PHAN:'); Writeln('------------------------------------'); Write('Nhap so thap phan la n='); Readln(n); i:=1; Repeat d[i]:=n mod 2; n:=n div 2; i:=i+1; Until(n=0); Write('So nhi phan la:'); For j:=i-1 downto 1 do Write (d[j]); Readln; End.

Bài 2: Chuyển 1 số từ hệ thập phân sang bát phân.

Program DOI_THAP_PHAN_SANG_BAT_PHAN; Uses Crt; Var d:array[1..20] of byte; i,j,n:integer; Begin Clrscr; Writeln('DOI SO THAP PHAN SANG BAT PHAN:'); Writeln('-------------------------------'); Write('Nhap so can doi n = ');Readln(n); i:=1; Repeat d[i]:=n mod 8; n:=n div 8; i:=i+1; Until n=0; Write('So bat phan la:'); For j:=i-1 downto 1 do Write(d[j]); Readln; End.

Tags: Lập trình Pascal

Ý kiến bạn đọc

Sắp xếp theo bình luận mới Sắp xếp theo bình luận cũ Sắp xếp theo số lượt thích
  • Trang ai có thể giúp mình viết CT chuyển từ hệ thập phân sang hệ 16 với ạ Trang 19/10/2023 15:49
    • Trả lời
    • Thích 1
    • Không thích 1
    • @Trang Program Doi_thap_phan_ra_thap_luc_phan;Uses Crt;VarN,Y:Word;He16,Tam:String;BeginClrscr;Writeln('DOI SO TU HE THAP PHAN SANG HE THAP LUC PHAN');Writeln(' -----------------');Write('- Nhap so can doi: ');Readln(N);He16:=' ';RepeatY:=N Mod 16;If Y < 10 ThenStr(Y, Tam)ElseTam:=Chr(Y+55);He16:=Tam + He16;N:= N Div 16;Until N = 0;Writeln('So he thap luc phan la: ',He16);ReadlnEnd. Bài Kiểm Tra 19/10/2023 21:20
      • Trả lời
      • Thích 3
      • Không thích 1

Theo dòng sự kiện

    /assets/news/2024_09/image-20240919121618-1.png Soạn Ngữ văn lớp 11 sách Chân trời sáng tạo, bài 1: Cõi lá

    /assets/news/2024_09/image-20240919121156-1.png Soạn Ngữ văn lớp 11 sách Chân trời sáng tạo, bài 1: Ai đã đặt tên cho dòng sông

Xem tiếp...

Những tin cũ hơn

    /assets/news/2020_01/tin-hoc-3.jpg Đề cương ôn tập thi học kì 1 Tin học 3

    /assets/news/2019_11/bai-tap-lap-trinh-pascal.jpg Lập trình Pascal: Viết chương trình sắp xếp dãy số chẵn lẻ

GIẢI BÀI TẬP
Lớp 1 Lớp 2 Lớp 3 Lớp 4 Lớp 5
Lớp 6 Lớp 7 Lớp 8 Lớp 9
Lớp 10 Lớp 11 Lớp 12
Bài học Bài soạn Bài giảng
Bài giới thiệu Bài hướng dẫn
Bài làm văn Bài trắc nghiệm
Kiểm tra 15P Kiểm tra 1 tiết
Kiểm tra HK1 Kiểm tra HK2
Thi vào lớp 10 Tốt nghiệp THPT
BÀI LUYỆN THI
Lớp 1 Lớp 2 Lớp 3 Lớp 4 Lớp 5
Lớp 6 Lớp 7 Lớp 8 Lớp 9
Lớp 10 Lớp 11 Lớp 12
Kiểm tra 15 phút Kiểm tra 1 tiết
Kiểm tra học kì 1 Kiểm tra học kì 2
Luyện thi theo Bài học
Luyện thi THPT Quốc Gia
THÀNH VIÊN Hãy đăng nhập thành viên để trải nghiệm đầy đủ các tiện ích trên site Nhập mã do ứng dụng xác thực cung cấp Thử cách khác Nhập một trong các mã dự phòng bạn đã nhận được. Thử cách khác Đăng nhập Đăng ký © 2020 Bàikiểmtra.com. All Rights Reserved. Bạn đã không sử dụng Site, Bấm vào đây để duy trì trạng thái đăng nhập. Thời gian chờ: 60 giây

Từ khóa » Chuyển Từ Hệ 10 Sang Hệ 2 Pascal