từ 1 đến 18 phải sử dụng bao nhiêu chữa số
ai nhập trong top 3 tôi kick cho
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.
Câu 1:
uses crt;
var s,i:integer;
begin
clrscr;
s:=0;
for i:=1 to 10 do
s:=s+i;
writeln('Tong cua 10 so tu nhien dau tien la: ',s);
readln;
end.
Câu 2:
uses crt;
var a:array[1..100]of integer;
i,n,dem:integer;
begin
clrscr;
write('Nhap n='); readln(n);
for i:=1 to n do
begin
write('A[',i,']='); readln(a[i]);
end;
dem:=0;
for i:=1 to n do
if a[i]>0 then inc(dem);
writeln('So luong phan tu duong la: ',dem);
readln;
end.
Câu 3:
uses crt;
var i,j:integer;
begin
clrscr;
for i:=1 to 9 do
begin
writeln('Bang nhan ',i,' la: ');
for j:=1 to 10 do
writeln(i,'*',j,'=',i*j);
delay(200);
end;
readln;
end.
uses crt;
var t,n,i,dem:integer;
begin
clrscr;
readln(n);
dem:=0;
t:=0;
for i:=0 to n do
if i mod 2=0 then
begin
t:=t+i;
dem:=dem+1;
end;
writeln(dem,' ',t);
readln;
end.
Uses Crt;
Var A : array [1..1000] of longint;
n, m, d, t, i, S, k : longint;
Begin
//Phan A
Clrscr;
Writeln(' Phan A ');
Write(' Ban hay nhap 1 so n bat ky: ');
Readln(n);
Write(' Cac so chia het cho ba tu 1 den ',n,' la: ');
For i:=1 to n do
If (i mod 3) = 0 then Write(' ',i);
//Phan B
Writeln;
Writeln(' Phan B ');
Write(' Ban hay nhap 1 so m bat ky: ');
Readln(m);
For i:=1 to m do
Begin
Write(' Ban hay nhap hang tu thu ',i,': ');
Readln(A[i]);
S:= S+A[i];
End;
Write(' Tong cua day so tren la: ',S);
//Phan C
Writeln;
Writeln(' Phan C ');
Write(' Ban hay nhap 1 so d bat ky: ');
Readln(d);
Write(' Ban hay nhap so K: ');
Readln(k);
For i:=1 to n do
Begin
Write(' Ban hay nhap hang tu thu ',i,': ');
Readln(A[i]);
If ((A[i] div k)=1)then t:=t+1;
End;
Write(' Co tat ca ',t,' so giong ',k);
Readln;
End.
Từ 1 đến 9 có 9 chữ số
Từ 10 đến 99 có 90 số => có 90 * 2 = 180 chữ số
Từ 100 đến 500 có 401 số => có 401 * 3 = 1203 chữ số
<=> Tù 1 đến 500 có : 1203 + 108 + 9 = 1392 chữ số
uses crt;
var i,n,d:longint;
begin
d:=0;
writeln('nhapn=');read(n);
for i:=1 to n do
begin
if i mod 3=0 then write(i,' ');
if i mod 3=0 then d:=d+i;
end;
writeln('tong=',d);
readln;
end;
- Từ 1-9 có 9 số, mỗi số có 1 chữ số nên có 9 chữ số.
- Từ 10-99 có 90 số, mỗi số có 2 chữ số nên có 90x2=180 chữ số
- số 100 co 3chữ số
Vậy: Bạn tâm phải viết tất cả là: 9+180+3=192 chữ số
GIẢI
Từ 1 đén 9 có 9 số có 1 chữ số ( 9.1=9)
Từ 10 đến 99 có 180 số có 2 chữ số ( 99-10+1).2=180
100 có 3 chữ số
vậy tâm cần : 9+180+3= 192 chữ số để đánh hết số trang.
Từ trang 1 -> trang 9 có 9 số có 1 chữ số
Từ trang 10 -> trang 99 có 90 số có 2 chữ số
Trang 100 có 1 số có 3 chữ số
Vậy , Tâm phải viết số chữ số là :
(9.1)+ (90.2) + (1.3) = 192 ( chữ số )
18 nha.
18 chữ số.