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.
AQ
1
KV
27 tháng 4 2023
Var array:[1..1000] of integer;
i,n:integer;
Begin
Write('n = ');readln(n);
For i:=1 to n do
Begin
Write('Nhap so thu ',i,' = ');readln(a[i]);
End;
Write('Cac so vua nhap la ');
For i:=1 to n do write(a[i]:8);
Readln
End.
KV
27 tháng 4 2023
Var array:[1..1000] of integer;
i,n,x:integer;
Begin
Write('n = ');readln(n);
For i:=1 to n do
Begin
Write('Nhap so thu ',i,' = ');readln(a[i]);
End;
Write('x = ');readln(x);
Write('Cac so lon hon ',x,' la ');
For i:=1 to n do
If a[i] > x then write(a[i]:8);
Readln
End.
giúp tôi c10 tn với c11 tl i
KV
28 tháng 4 2023
Câu 10 TN:
t = 8
Câu 11 TL
1) {5} {4} {2} {1} {3}
2) Chương trình trên dùng để tính tổng các số từ 1 đến n (n = 10)
3) n = 3; S = 6
Em nhập nội dung câu hỏi vào lại nha!