Dòng 7 : Sửa lại thành : write('Nhap si so lop :');
Dòng 13 : Sửa lại thành : end;
Dòng 14: Sửa lại thành : writeln('bang diem vua nhap : ');
Dòng 16: Sửa lại thành : writeln('thu ',i,': ',a[i]:1:2,' diem');
tìm chỗ sai và sửa loi
var N: integer
var X: array[ 1..N] of integer ;
lẹ giúp mik mai thi r
Giúp mình bài 14 tìm lỗi sai với ạ
a, Var begin:real;
b, Const y:integer;
c, Var bk=3
d, Var AB:array[1...100] of integer;
e, Var Diem: array[3.8..4.5] of real;
Cách khai báo sau đây là đúng hay sai? Nếu sai hãy sửa lại:
Var x:array [10,13] of integer;
S:=0; n:=0; while S < for do n:=n + 1; S:= s+n
For i:=1 to 10 do; writeln ('A')
Var x: real; begin for x:=1 to 10 do writeln ('A'); end.
Giúp mình với ạ
Các bạn ơi giúpp mìnhhh với! Mình đang cần gấp ạ!! Trước khi gửi mong các bạn chạy trước giúp mình ạ! Xin cảm ơn! 
Mọi người giúp mình bài này với, xin cảm ơn rất nhiều ạ!
mọi người ơi giúp mình với ạ, mai mik thi rùi, cảm ơn mn nhiều
Viết chương trình nhập n số nguyên từ bàn phím. In ra màn hình các số vừa nhập và đếm xem trong n số đó có bao nhiêu số lớn hơn 10 và nhỏ hơn 20
Mọi người giúp em bài này với ạ, em mới biết làm chỗ in ra màn hình các số vừa nhập thôi ạ!
