K
Khách

Hãy nhập câu hỏi của bạn vào đây, nếu là tài khoản VIP, bạn sẽ được ưu tiên trả lời.

uses crt;

var st:string;

    i,j,n,d,x,y:integer;

    kq,lt:longint;

begin

clrscr;

write('nhap so nhi phan:'); readln(st);

d:=length(st);

kq:=0;

for i:=1 to d do

  begin

     lt:=1;

     for j:=1 to d-i do

       lt:=lt*2;

     val(st[i],x,y);

     kq:=kq+x*lt;

  end;

writeln(st,' doi sang he 10 la: ',kq);

readln;

end.

 

7 tháng 6 2021

Nguyên tắc của phương pháp chuyển đổi từ hệ cơ số 10 sang hệ cơ số 2 là lấy số cần chuyển đổi chia cho 2 (kết quả chỉ lấy phần nguyên), sau đó tiếp tục lấy kết quả chia 2 (và cũng chỉ lấy phần nguyên), kết quả số nhị phân thu được là tập hợp các số dư của các phép chia.
 

17 tháng 12 2021

#include <bits/stdc++.h>

using namespace std;

long long n,x;

int main()

{

cin>>n>>x;

cout<<pow(n,x);

return 0;

}

8 tháng 11 2021

mn ơi giúp em voiiiii. có ai khong:((

 

int a[100][100]

1 tháng 5 2020

var i:longint; thap:real;
nhi:string;
begin
readln(nhi); thap:=0;
for i:=1 to length(nhi) do
begin
thap:=thap + (ord(nhi[i])-48)* exp(ln(2)*(length(nhi)-i));
end;
write(thap:2:0);
readln
end.

uses crt;
var st:string;
i,j,n,d,x,y:integer;
kq,lt:longint;
begin
clrscr;
write('nhap so nhi phan:'); readln(st);
d:=length(st);
kq:=0;
for i:=1 to d do
begin
lt:=1;
for j:=1 to d-i do
lt:=lt*2;
val(st[i],x,y);
kq:=kq+x*lt;
end;
writeln(st,' doi sang he 10 la: ',kq);
readln;
end.

Câu 1 - Các số đặc biệt                     Tên tệp chương trình : CAU1.PASĐịnh nghĩa: - Một số được gọi là đối xứng, nếu đọc từ bên trái sang bên phải hoặc từ bên phải sang trái đều được cùng một số. Ví dụ: số 75457 là số đối xứng.- Số chính phương là số bằng bình phương đúng của một số nguyên. Ví dụ số 256 là số chính phương (vì 256=162)Cho 2 số tự nhiên M và N (M, N trong khoảng từ 10 đến...
Đọc tiếp

Câu 1 - Các số đặc biệt                     Tên tệp chương trình : CAU1.PAS

Định nghĩa:

- Một số được gọi là đối xứng, nếu đọc từ bên trái sang bên phải hoặc từ bên phải sang trái đều được cùng một số. Ví dụ: số 75457 là số đối xứng.

- Số chính phương là số bằng bình phương đúng của một số nguyên. Ví dụ số 256 là số chính phương (vì 256=162)

Cho 2 số tự nhiên M và N (M, N trong khoảng từ 10 đến 100000 và M <N).

Yêu cầu:

a) Liệt kê và đếm xem có bao nhiêu số đối xứng nằm trong khoảng [M,N]

b) Liệt kê và đếm xem có bao nhiêu số chính phương nằm trong khoảng [M,N]

c) Liệt kê và đếm xem có bao nhiêu số đối xứng chính phương trong khoảng [M,N]

Dữ liệu vào là 2 số tự nhiên M và N nhập từ bàn phím. Kết quả in ra màn hình .

1
1 tháng 6 2021

Program HOC24;

var m,i,n: longint;

d1,d2,d3: integer;

function dx(x: longint): boolean;

var j: longint;

s,s1: string;

begin

s1:=''; dx:=false;

str(x,s);

for j:=length(s) downto 1 do 

s1:=s1+s[j];

if s=s1 then dx:=true else exit;

end;

function cp(k: longint): boolean;

begin

cp:=false;

if k=sqr(trunc(sqrt(k))) then cp:=true else exit;

end;

begin

write('Nhap M; N: '); readln(m,n);

d1:=0; d2:=0; d3:=0;

if (m<n) and (m>=10) and (n<=100000) then

begin

write('Cac so doi xung la: ');

for i:=m to n do

if dx(i) then

begin

d1:=d1+1;

write(i,' ');

end;

writeln;

writeln('Co ',d1,' so doi xung');

write('Cac so chinh phuong la: ');

for i:=m to n do

if cp(i) then 

begin

d2:=d2+1;

write(i,' ');

end;

writeln;

writeln('Co ',d2,' so chinh phuong');

write('Cac so doi xung chinh phuong la: ');

for i:=m to n do

if dx(i) and cp(i) then 

begin

d3:=d3+1;

write(i,' ');

end;

writeln;

write('Co ',d3,' so doi xung chinh phuong');

end;

readln

end.

uses crt;
var st:string;
i,j,n,d,x,y:integer;
kq,lt:longint;
begin
clrscr;
write('nhap so nhi phan:'); readln(st);
d:=length(st);
kq:=0;
for i:=1 to d do
begin
lt:=1;
for j:=1 to d-i do
lt:=lt*2;
val(st[i],x,y);
kq:=kq+x*lt;
end;
writeln(st,' doi sang he 10 la: ',kq);
readln;
end.

7 tháng 3 2020

uses crt;
var x,i,luu:integer;
nhiphan,thapphan,kt,test:string;
a: array [1..15] of integer;
begin
clrscr;
write('So nhi phan: ');readln(nhiphan);
str(10, test);
if nhiphan >= test then begin
i:= 1; x:= 1;
repeat
x:= x + 1;
luu:= x;
repeat
a[i]:= luu mod 2;
luu:= luu div 2;
i:= i + 1;
until luu = 0;
str(a[i - 1], thapphan);
for i:= i - 2 downto 1 do
begin
str(a[i], kt);
thapphan:= thapphan + kt;
end;
until thapphan = nhiphan;
end
else if nhiphan < test then
if nhiphan = '0'then x:= 0
else if nhiphan = '1' then x:= 1;
write('So thap phan la: ',x);
readln
end.

18 tháng 1 2021

Program HOC24;

var s: string;

tg,d,max,i: byte;

code: integer;

begin

write('Nhap xau : '); readln(s);

// cau a

for i:=1 to length(s) do if s[i] in ['a'..'z'] then write(upcase(s[i]));

//------

writeln;

//-cau b

for i:=length(s) downto 1 do if s[i] in ['0'..'9'] then write(s[i]);

//------

writeln;

//---cau c

d:=0;

for i:= 1 to length(s) do

if s[i] in ['0'..'9'] then 

begin

val(s[i],tg,code);

if tg>max then max:=tg;

d:=d+1;

end;

if d=0 then write('Khong co chu so trong day') else write('Chu so lon nhat la : ',max);

readln 

end.

uses crt;

var st,st1:string;

d,i,d1,max,x,y:integer;

begin

clrscr;

write('Nhap xau:'); readln(st);

d:=length(st);

writeln('Day cac ki tu thuong doi sang chu hoa la: ');

for i:=1 to d do 

  if st[i] in ['a'..'z'] then write(upcase(st[i]):4);

st1:='';

for i:=1 to d do 

  if st[i] in ['0'..'9'] then st1:=st1+st[i];

d1:=length(st1);

for i:=d1 downto 1 do 

  write(st1[i]:4);

writeln;

max:=0;

for i:=1 to d1 do 

  begin

val(st1[i],x,y);

if max<x then max:=x;

end;

writeln('Chu so lon nhat trong xau la: ',max);

readln;

end.

Chào mừng Lễ Phật Đản 2019 tổ chức tại chùa Tam Chúc - Hà Nam. Ban tổ chức lắp một bảng đèn điện tử gồm N bóng đèn (20 <= N <= 200) được đánh số từ 1 đến N với nội dung "CHÀO MỪNG LỄ PHẬT ĐẢN 2019 ". Để tạo sự nhấp nháy cho bảng đèn, cứ mỗi giây các bóng đèn trên bảng sẽ thay đổi trạng thái (chuyển từ tắt sang sáng và ngược lại) theo nguyên tắc sau: – Giây thứ nhất: chuyển trạng thái...
Đọc tiếp

Chào mừng Lễ Phật Đản 2019 tổ chức tại chùa Tam Chúc - Hà Nam. Ban tổ chức

lắp một bảng đèn điện tử gồm N bóng đèn (20 <= N <= 200) được đánh số từ 1 đến N

với nội dung "CHÀO MỪNG LỄ PHẬT ĐẢN 2019 ". Để tạo sự nhấp nháy cho bảng

đèn, cứ mỗi giây các bóng đèn trên bảng sẽ thay đổi trạng thái (chuyển từ tắt sang sáng

và ngược lại) theo nguyên tắc sau:

– Giây thứ nhất: chuyển trạng thái tất cả các bóng đèn

– Giây thứ 2: chuyển trạng thái các bóng đèn có số hiệu chia hết cho 2

– Giây thứ 3: chuyển trạng thái các bóng đèn có số hiệu chia hết cho 3

– …

– Giây thứ 10: chuyển trạng thái các bóng đèn có số hiệu chia hết cho 10

– Kể từ giây thứ i trở đi (i >= 11) , việc chuyển trạng thái được thực hiện tương tự như ở giây thứ k (với k là phần dư của phép chia i cho 10).

Yêu cầu: Hãy viết chương trình tính tổng số và liệt kê các bóng đèn sáng ở giây thứ T (1 <= T <= 3600), biết rằng ban đầu tất cả các bóng đèn đều tắt

0
29 tháng 7 2020

Đó là tất cả rồi bạn ạ

29 tháng 7 2020

Yêu cầu: Hãy viết chương trình tính tổng số và liệt kê các bóng đèn sáng ở giây thứ T (1 <= T <= 3600), biết rằng ban đầu tất cả các bóng đèn đều tắt

19 tháng 10 2021

#include <bits/stdc++.h>
using namespace std;
int main() {
double BMI, khoiluong, chieucao;
cin >> khoiluong >> chieucao;
BMI=khoiluong/(chieucao*2);
cout << BMI << endl;
return 0;
}

Chúc bn học tốt!