Viết từ 1 đến 100
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.
a)1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,16,17,18,19
b)10,20,30,40,50,60,70,80,90
c)101,102,103,104,105,106,107,108,109
~hok tot~
Muốn tính tổng từ 1 - 10000
B1:( 10000 - 1 ) : 1 + 1 = 10000
B2:[( 10000 + 1 ) * 10000] : 2 = 50005000
ta làm bài toán này dựa trên công thức của nhà toán học người Đức Gau - xơ
Muốn tính số số hạng từ 1 đến 100 ta có:
(số cuối - số đầu) : khoảng cách + 1
=>hay (100 - 1) : 1 +1 =100 (số hạng)
Câu 1:
program an_danh;
uses crt;
var n,i:integer;
begin
clrscr;
n:= 0;
for i:= 1 to 100 do
if i mod 3 = 0 then n:= n + 1;
write('So cac so la boi cua 3 la: ',n);
readln
end.
Câu 2:
program an_danh;
uses crt;
var n,i:integer;
begin
clrscr;
n:= 0;
for i:= -100 to 100 do
if i mod 2 = 0 then n:= n + 1;
write('Cac so chan pham vi tu -100 den 100 la: ',n);
readln
end.
Câu 3:
program an_danh;
uses crt;
var i:integer;
begin
clrscr;
for i:= 1 to 100 do
if i mod 5 = 0 then write(i,' ');
readln
end.
Bài 1:
uses crt;
var i,dem:integer;
begin
clrscr;
dem:=0;
for i:=1 to 100 do
if i mod 3=0 then inc(dem);
writeln('so boi cua 3 trong pham vi tu 1 den 100 la: ',dem);
readln;
end.
Bài 2:
uses crt;
var i,dem:integer;
begin
clrscr;
dem:=0;
for i:=-100 to 100 do
if i mod 2=0 then inc(dem);
writeln('so luong so chan trong pham vi tu -100 den 100 la: ',dem);
readln;
end.
Bài 3:
uses crt;
var i,dem:integer;
begin
clrscr;
dem:=0;
for i:=1 to 100 do
if i mod 5=0 then inc(dem);
writeln('so boi cua 5 trong pham vi tu 1 den 100 la: ',dem);
readln;
end.
Tham khảo1: one
2: two
3: three
4: four
5: five
6: six
7: seven
8: eight
9: nine
10: ten
11: eleven
12: twelve
13: thirteen
14: fourteen
15: fifteen
16: sixteen
17: seventeen
18: eighteen
19: nineteen
20: twenty
21: twenty-one
22: twenty-two
23: twenty-three
24: twenty-four
25: twenty-five
26: twenty-six
27: twenty-seven
28: twenty-eight
29: twenty-nine
30: thirty
31: thirty-one
32: thirty-two
33: thirty-three
34: thirty-four
35: thirty-five
36: thirty-six
37: thirty-seven
38: thirty-eight
39: thirty-nine
40: forty
41: forty-one
42: forty-two
43: forty-three
44: forty-four
45: forty-five
46: forty-six
47: forty-seven
48: forty-eight
49: forty-nine
50: fifty
51: fifty-one
52: fifty-two
53: fifty-three
54: fifty-four
55: fifty-five
56: fifty-six
57: fifty-seven
58: fifty-eight
59: fifty-nine
60: sixty
61: sixty-one
62: sixty-two
63: sixty-three
64: sixty-four
65: sixty-five
66: sixty-six
67: sixty-seven
68: sixty-eight
69: sixty-nine
70: seventy
71: seventy-one
72: seventy-two
73: seventy-three
74: seventy-four
75: seventy-five
76: seventy-six
77: seventy-seven
78: seventy-eight
79: eventy-nine
80: eighty
81: eighty-one
82: eighty-two
83: eighty-three
84: eighty-four
85: eighty-five
86: eighty-six
87: eighty-seven
88: eighty-eight
89: eighty-nine
90: ninety
91: ninety-one
92: ninety-two
93: ninety-three
94: ninety-four
95: ninety-five
96: ninety-six
97: ninety-seven
98: ninety-eight
99: ninety-nine
100: one hundred
Tham khảo
1: one2: two3: three4: four5: five6: six7: seven8: eight9: night10: ten11: eleven12: twelve13: thirteen14: fourteen15: fifteen16: sixteen17: seventeen18: eighteen19: nineteen20: twenty21: twenty-one22: twenty-two23: twenty-three24: twenty-four25: twenty-five26: twenty-six 27: twenty-seven28: twenty-eight29: twenty-nine30: thirty31: thirty-one32: thirty-two33: thirty-three34: thirty-four35: thirty-five36: thirty-six37: thirty-seven38: thirty-eight39: thirty-nine40: fourty50 – fifty60 – sixty70 – seventy80 – eighty90 – ninety100 – one hundredTừ 100 đến 999 có 280 c/s 5
Bạn cứ tính xem từ 100 tới 195 có 20 c/ s 5......cho đến 900 tới 995 có 20 c/số 5
Bằng cách vd:(195-100):5+1=20c/số 5
Riêng 500 đến 599 thì có tất cả 120 c/số 5 sau đó cong hết lại là xong
Từ 100 đến 999 có 280 c/s 5
Bạn cứ tính xem từ 100 tới 195 có 20 c/ s 5......cho đến 900 tới 995 có 20 c/số 5
Bằng cách vd:(195-100):5+1=20c/số 5
Riêng 500 đến 599 thì có tất cả 120 c/số 5 sau đó cong hết lại là xong
a)
uses crt;
var i,n:integer;
begin
clrscr;
repeat
write('Nhap n='); readln(n);
until n<100;
if n mod 2=0 then
begin
for i:=0 to n do
if i mod 2=0 then write(i:4);
end
else writeln(n,' khong la so chan');
readln;
end.
b)
uses crt;
var i,n:integer;
begin
clrscr;
repeat
write('Nhap n='); readln(n);
until n<100;
if n mod 2=1 then
begin
for i:=1 to n do
if i mod 2=1 then write(i:4);
end
else writeln(n,' khong la so le');
readln;
end.
Theo dãy số ta có:
Chứ số thứ 1 là: \(1=1\times1\)
Chữ số thứ 2 là: \(2=1\times2\)
Chữ số thứ 3 là: \(3=1\times3\)
......
Vậy chữ số thứ 100 là: \(1\times100=100\)
1 đến 100 nha a