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.
1/
program uoc;
uses crt;
var n,i,dem,x:word;
a:array[1..20] of longint;
begin
clrscr;
write('nhap so phan tu cua day:') ;readln(n);
while n>20 do
begin
write('nhap lai so phan tu thoa man toi da la 20 phan tu:');
readln(n);
end;
writeln('nhap cac phan tu cua mang:');
for i:=1 to n do
begin
write('a[',i,']='); readln(a[i]);
end;
write('nhap so nguyen x:'); readln(x);
dem:=0;
for i:=1 to n do
if x mod a[i] =0 then
begin
dem:=dem+1;
writeln(a[i],' la uoc cua ',x);
end;
if dem=0 then writeln('khong co phan tu la uoc cua ',x)
else write('co ',dem,' phan tu la uoc cua ',x);
readln;
end.
nhìn mặc áo hình như trò chơi con mực đúng hông đấy là trò giết người hả
Tl :
Khong duoc viet lung tung tren dien dang
~ H T ~
```python
with open('BIENDOI.INP', 'r') as f:
x = int(f.readline().strip())
p = 0
i = 0
while x > 0:
p += (x % 8) * pow(10, i)
x //= 8
i += 1
q = int(''.join(sorted(str§)))
while True:
pq = p - q
pq_sorted = int(''.join(sorted(str(pq))))
if pq_sorted == pq:
break
p = pq
q = int(''.join(sorted(str§)))
b = 0
i = 0
while pq > 0:
b += (pq % 10) * pow(8, i)
pq //= 10
i += 1
with open('BIENDOI.OUT', 'w') as f:
f.write(str(b))
```
bạn cho mình hỏi lớp mấy vậy:)