![](https://rs.olm.vn/images/avt/0.png?1311)
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.
![](https://rs.olm.vn/images/avt/0.png?1311)
Dưới đây là một vài câu hỏi có thể liên quan tới câu hỏi mà bạn gửi lên. Có thể trong đó có câu trả lời mà bạn cần!
![](https://rs.olm.vn/images/avt/0.png?1311)
T
1
![](https://rs.olm.vn/images/avt/0.png?1311)
I
1
CD
1
![](https://rs.olm.vn/images/avt/0.png?1311)
10 tháng 5 2021
Câu 2:
uses crt;
var a:array[1..100]of integer;
i,n,t:integer;
begin
clrscr;
write('Nhap n='); readln(n);
for i:=1 to n do
begin
write('A[',i,']='); readln(a[i]);
end;
t:=0;
for i:=1 to n do
if (4<a[i]) and (a[i]<15) then t:=t+a[i];
writeln(t);
readln;
end.
Kiểu này là thi òi:)
Mik thi như này nhìu nên bít:>
a:
Input: a=20
Output: a*a