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.

29 tháng 6 2023

program tim_nguon_nho_nhat;

const
  MAX_NUMBER = 10000;

var
  M, nguon_nho_nhat: Integer;

function TinhTongChuSo(num: Integer): Integer;
var
  sumOfDigits: Integer;
begin
  sumOfDigits := 0;
  while num > 0 do
  begin
    sumOfDigits := sumOfDigits + (num mod 10);
    num := num div 10;
  end;
  TinhTongChuSo := sumOfDigits;
end;

function TimNguonNhoNhat(M: Integer): Integer;
var
  N, M_temp, M_digits, nguon_nho_nhat: Integer;
begin
  M_temp := M;
  nguon_nho_nhat := MAX_NUMBER;
  for N := 1 to M_temp do
  begin
    M_digits := TinhTongChuSo(N) + N;
    if M_digits = M_temp then
    begin
      if N < nguon_nho_nhat then
        nguon_nho_nhat := N;
    end;
  end;
  if nguon_nho_nhat = MAX_NUMBER then
    TimNguonNhoNhat := 0
  else
    TimNguonNhoNhat := nguon_nho_nhat;
end;

begin
  Readln(M);
  nguon_nho_nhat := TimNguonNhoNhat(M);
  if nguon_nho_nhat = 0 then
    Writeln('0')
  else
    Writeln('Nguon nho nhat cua ', M, ' la ', nguon_nho_nhat);
end.

 

26 tháng 1 2021

\(^∗\)Xét \(n=2011\)thì \(S\left(2011\right)=2011^2-2011.2011+2010=2010\)(vô lí)

\(^∗\)Xét \(n>2011\)thì \(n-2011>0\)do đó \(S\left(n\right)=n\left(n-2011\right)+2010>n\left(n-2011\right)>n\)(vô lí do \(S\left(n\right)\le n\))

* Xét \(1\le n\le2010\)thì \(\left(n-1\right)\left(n-2010\right)\le0\Leftrightarrow n^2-2011n+2010\le0\)hay \(S\left(n\right)\le0\)(vô lí do \(S\left(n\right)>0\))

Vậy không tồn tại số nguyên dương n thỏa mãn đề bài

a)

uses crt;

var n,i,t,j:integer;

begin

clrscr;

write('Nhap n='); readln(n);

for i:=1 to n do 

  begin

t:=0;

for j:=1 to i-1 do 

 if i mod j=0 then t:=t+j;

if t=i then write(i:4);

end;

readln;

end.

b)

uses crt;

var gt:real;

i,n:integer;

begin

clrscr;

write('Nhap n='); readln(n);

gt:=1;

for i:=1 to n do 

 gt:=gt*i;

writeln(gt:0:0);

readln;

end.

Câu 1:Hai đường thẳng cắt nhau là hai đường thẳng có ......................... điểm chung.Câu 2:Với n là số tự nhiên thỏa mãn2n=256 .Khi đó n=............................ Câu 3:Kết quả của phép tính:  bằng Câu 4:Kết quả của phép tính (-5) + (-6) + (-7) là .......................Câu 5:Khi viết tất cả các số tự nhiên từ 1 đến 100 thì chữ số 1 được viết ................. lần.Câu 6:Từ ba chữ số 0; 5; 9, ta...
Đọc tiếp

Câu 1:
Hai đường thẳng cắt nhau là hai đường thẳng có ......................... điểm chung.

Câu 2:
Với n là số tự nhiên thỏa mãn2n=256 .Khi đó n=............................ 

Câu 3:
Kết quả của phép tính:  bằng 

Câu 4:
Kết quả của phép tính (-5) + (-6) + (-7) là .......................

Câu 5:
Khi viết tất cả các số tự nhiên từ 1 đến 100 thì chữ số 1 được viết ................. lần.

Câu 6:
Từ ba chữ số 0; 5; 9, ta có thể viết tất cả ........................ số có ba chữ số, trong mỗi số các chữ số đều khác nhau.

Câu 7:
Kết quả của phép tính: \(5.\left(27-17\right)^2-6^{11}:6^3:6^6\) bằng ...............

Câu 8:
Ba số lẻ liên tiếp có tích bằng 12075. Vậy tổng của ba số đó có giá trị là .....................

Câu 9:
Cho số nguyên n, biết n thỏa mãn: n2+3n-13 chia hết n+3 Vậy giá trị nhỏ nhất của n là .....................

Câu 10:
Chữ số tận cùng của số 571999

1

Nếu chị hỏi từng câu người ta sẽ muốn trả lời hơn đấy ạ! Về việc trả lời thì em lớp 5! @.@

Câu 1Hai đường thẳng cắt nhau là hai đường thẳng có....  điểm chung.Câu 2:Tập hợp C = {Bưởi, cam, chanh, táo, đào, mơ, mận, mít, hồng} có .... phần tử.Câu 3:Với n  là số tự nhiên thỏa mãn n^2 = 256  .Khi đó   n = ....Câu 4:Cho số a nguyên dương khi đó kết quả của phép tính ( 0 : 2a )  bằng .......Câu 5:Có tất cả ..... số có 5 chữ số.Câu 6:Kết quả của phép tính:120-5(20-2x3^2)^2 -6^3:6 bằng...
Đọc tiếp

Câu 1

Hai đường thẳng cắt nhau là hai đường thẳng có....  điểm chung.

Câu 2:
Tập hợp C = {Bưởi, cam, chanh, táo, đào, mơ, mận, mít, hồng} có .... phần tử.

Câu 3:
Với n  là số tự nhiên thỏa mãn n^2 = 256  .Khi đó   n = ....

Câu 4:
Cho số a nguyên dương khi đó kết quả của phép tính ( 0 : 2a )  bằng .......

Câu 5:
Có tất cả ..... số có 5 chữ số.

Câu 6:
Kết quả của phép tính:120-5(20-2x3^2)^2 -6^3:6 bằng ........

Câu 7:
Từ ba chữ số 0; 5; 9, ta có thể viết tất cả ...... số có ba chữ số, trong mỗi số các chữ số đều khác nhau.

Câu 8:
Biết rằng số bị chia là 236, số dư là 15, số chia là số tự nhiên có hai chữ số. Vậy số chia có thể là .....

Câu 9:
Cho số nguyên n , biết n  thỏa mãn: n^2 + 3n-16  chia hết n+3  Vậy giá trị nhỏ nhất của n là .....

Câu 10:
Tổng số trang của 8 quyển vở loại 1; 9 quyển vở loại 2 và 5 quyển vở loại 3 là 1980 trang.Số trang của 3 quyển vở loại 2 chỉ bằng số trang của 2 quyển vở loại 1.Số trang của 4 quyển vở loại 3 bằng số trang của 3 quyển vở loại 2.Tính số trang của mỗi quyển vở loại 2.
Trả lời: Số trang của mỗi quyển vở loại 2 là ............  trang.

1
6 tháng 3 2016

sao lai lay trong vioympic ha

15 tháng 3 2023

- Vì N là số tự nhiên có hai chữ số nên đặt \(N=\overline{ab}\) \(\left(0< a\le9;0\le b\le9;a,b\in N\right)\)

Ta có \(S\left(N\right)=S\left(\overline{ab}\right)=ab\) ; \(P\left(N\right)=P\left(\overline{ab}\right)=a+b\)

Vì \(N=S\left(N\right)+P\left(N\right)\) nên \(\overline{ab}=ab+a+b\)

\(\Rightarrow10a+b=ab+a+b\)

\(\Rightarrow9a=ab\Rightarrow b=9\) (vì a khác 0)

Vậy chữ số hàng đơn vị của N là 9 ---> chọn E

16 tháng 3 2023

em cảm ơn ạ, nhưng có thể cho em hỏi tại sao suy ra được 10a+b=ab+a+b vậy ạ?

Câu 1:Kết quả của phép tính (-5) + (-6) + (-7) là ...........Câu 2:Với n là số tự nhiên thỏa mãn 2n  = 256 .Khi đó n = ...................... Câu 3:Cho số a nguyên dương khi đó kết quả của phép tính 0:(2a) bằng .....................Câu 4:Nếu x+13=5 thì x bằng .................Câu 5:Biết: 15.23+4.32-5.7=a2 , trong đó a là số tự nhiên. Khi đó giá trị của a là ...................Câu 6:Biết x thuộc tập hợp các ước của...
Đọc tiếp

Câu 1:
Kết quả của phép tính (-5) + (-6) + (-7) là ...........

Câu 2:
Với n là số tự nhiên thỏa mãn 2n  = 256 .Khi đó n = ...................... 

Câu 3:
Cho số a nguyên dương khi đó kết quả của phép tính 0:(2a) bằng .....................

Câu 4:
Nếu x+13=5 thì x bằng .................

Câu 5:
Biết: 15.23+4.32-5.7=a2 , trong đó a là số tự nhiên. Khi đó giá trị của a là ...................

Câu 6:
Biết x thuộc tập hợp các ước của 36 và \(x\ge6\) Khi đó có tất cả ................ giá trị của x thỏa mãn

Câu 7:
Kết quả của phép tính: \(5.\left(27-17\right)^2-6^{11}:6^3:6^6\) bằng .....................

Câu 8:
Số tự nhiên n lớn nhất có 3 chữ số khi chia cho 8 thì dư 7 còn chia 31 thì dư 28. Vậy giá trị của n là ................

Câu 9:
Cho số nguyên n, biết n thỏa mãn: \(n^2+3n-13\) chia hết cho \(n+3\) Vậy giá trị nhỏ nhất của n là ...............

Câu 10:
Tập hợp các số nguyên tố p để p+10 và p+14 đều là các số nguyên tố là S={...............} 
(Nhập các giá trị theo thứ tự tăng dần,ngăn cách nhau bởi dấu ";" )

4
7 tháng 3 2016

vòng mấy đây bạn

7 tháng 3 2016

vòng 15 bạn nhá

BÀI 2. ĐỘ CAO CỦA DÃY SỐ DOCAO13.PASTa gọi độ cao của một số nguyên dương K là tổng giá trị các chữ số của K.Ví dụ: số 25362 có độ cao là 18. Cho dãy số nguyên dương A gồm N phần tử a 1 ,a 2 , ..., a N .(1 ≤ N ≤ 1000, 1 ≤ i ≤ N, 0 &lt; a i ≤ 2147483647)Yêu cầu: Hãy tính độ cao của các phần tử trong dãy số A.Dữ liệu vào: Ghi trong file văn bản DOCAO13.INP có cấu trúc như sau:- Dòng 1: Ghi số nguyên dương N, là số...
Đọc tiếp

BÀI 2. ĐỘ CAO CỦA DÃY SỐ DOCAO13.PAS
Ta gọi độ cao của một số nguyên dương K là tổng giá trị các chữ số của K.
Ví dụ: số 25362 có độ cao là 18. Cho dãy số nguyên dương A gồm N phần tử a 1 ,
a 2 , ..., a N .(1 ≤ N ≤ 1000, 1 ≤ i ≤ N, 0 &lt; a i ≤ 2147483647)
Yêu cầu: Hãy tính độ cao của các phần tử trong dãy số A.
Dữ liệu vào: Ghi trong file văn bản DOCAO13.INP có cấu trúc như sau:
- Dòng 1: Ghi số nguyên dương N, là số lượng phần tử của dãy số.
- Dòng 2: Ghi N số nguyên dương, số thứ i là giá trị của phần tử a i trong dãy số,
các số được ghi cách nhau ít nhất một dấu cách.
Dữ liệu ra: Ghi ra file văn bản DOCAO13.OUT theo cấu trúc như sau:
- Dòng 1: Ghi N số nguyên dương t 1 , t 2 , ..., t N, t i là độ cao của số của a i . Các số
được ghi cách nhau một dấu cách.
Ví dụ:

DOCAO13.INP DOCAO13.OUT
5 13 5 5 10 9

1

const fi='docao13.inp';

fo='docao13.out';

var f1,f2:text;

a:array[1..100]of integer;

i,n:integer;

//chuongtrinhcon

function kq(x:integer):integer;

var t,k:integer;

begin

t:=0;

while (x>0) do

begin

k:=x mod 10;

t:=t+k;

x:=x div 10;

end;

kq:=t;

end;

//chuongtrinhchinh

begin

assign(f1,fi); reset(f1);

assign(f2,fo); rewrite(f2);

readln(f1,n);

for i:=1 to n do 

read(f1,a[i]);

for i:=1 to n do

write(f2,kq(a[i]):4);

close(f1);

close(f2);

end.