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.
Các câu hỏi dưới đây có thể giống với câu hỏi trên
8 tháng 5 2017
thiếu hai dấu chấm phẩy ";" ở: 
sửa thành:
TB: real;
A: array [1..100] of real;
lại thiếu dấu chấm phẩy ở ba chỗ nữa lần lượt là:
và 
và 
Sửa lại thành:
readln (a[i]);
TB:=0;
TB:=TB/n;
Cần có thêm readln trên end. để dừng chương trình lại để xem.
ND
3
mình đang cần gấp
25 tháng 9 2016
begin
writeln('*****');
writeln('*****');
writeln('*****');
writeln('*****');
writeln('*****');
readin
end.
g
HN
10 tháng 5 2017
4a
5d
7 không đáp án nào đúng đâu bạn
8c
9a
12a
13a
14d
15c
16c
17b
19c
chúc bạn thi tốt 
11 tháng 5 2017
Program tính_chia;
Uses crt;
Var i, n, s, a: integer;
Begin
Write('Nhap so n: '); readln(n);
s:=1;
For i:=1 to n do s:=s*i;
a:=0;
For i:=1 to n do a:=a+i;
Writeln('Ket qua phep tinh chia bang: ', s/a :10:2);
readln;
End.
bn là cung nào?
Các bạn giúp mình với 
Lỗi 201. Range check error: Lỗi kiểm tra vùng xãy ra.
Nếu trình biên dịch có chế độ Kiểm tra vùng (Range-Checking) được mở, thì có thể xãy ra các lỗi sau:
Lỗi 1. An array was accessed with an index outside its declared range: Có lệnh truy cập vào 1 vùng nằm ngoài khai báo 1 Array.
Lỗi 2. Trying to assign a value to a variable outside its range (for instance an enumerated type): Có lệnh gán giá trị vượt quá giới hạn giá trị của biến.
Nhập số bé hơn đi bạn, cái lỗi này thường sẽ xảy ra khi bạn nhập số quá lớn