in tat ca cac so co 5 chu so sao cho cac chu so cua no la 1 day tang pascal
giúp em vs mn
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.
12346
12356
12456
12453
13456
13426
tk cho tui nha
hihi mơn mọi người nhiều lắm !!!!!
mk nhớ ko rõ là 5866608 hoặc 5866680
1 trong 2 đáp án đó đúng 100%
ta có: +) có 4 cách chọn hàng trăm (1,2,3,4)
+) có 5 cách chọn hàng chục (0,1,2,3,4)
+) có 5 cách chọn hàng đơn vị (0,1,2,3,4)
=> số số có 3 chữ số mà các chữ số bé hơn 5 là 4*5*5=100 số
bạn có chơi bang bang ko mà tên là bang bang. 100 số đúng rồi
uses crt;
var d,x,kt,j:integer;
st:string;
a:array[1..100]of longint;
i:longint;
begin
clrscr;
for i:=10000 to 99999 do
begin
str(i,st);
d:=length(st);
for j:=1 to d do
val(st[j],a[j],x);
kt:=0;
for j:=1 to d-1 do
if a[j]>=a[j+1] then kt:=1;
if kt=0 then write(i:6);
end;
readln;
end.
Kết quả bài này nó sẽ ra thế này: