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 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:

Hỏi đáp Tin học

6 tháng 3 2017

12346

12356

12456

12453

13456

13426

tk cho tui nha

hihi mơn mọi người nhiều lắm !!!!! 

6 tháng 3 2017

23732880

4 tháng 3 2017

bằng 5866680 đó bạn 

4 tháng 3 2017

mk nhớ ko rõ là 5866608 hoặc 5866680

1 trong 2 đáp án đó đúng 100%

26 tháng 2 2016

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ố

26 tháng 2 2016

bạn có chơi bang bang ko mà tên là bang bang. 100 số đúng rồi

12 tháng 1 2016

6 so 

3.45

3.54

4.35

4.53

5.34

5.43