.
giúp mình giải câu hỏi này vs
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.
uses crt;
var i:integer;
begin
clrscr;
for i:=0 to 99 do
begin
write(i:4);
if (i%10=9) then writeln;
end;
readln;
end.
Program kiemtra: -> kết thúc phải là dấu ';', sửa: Program kiemtra;
Use crt -> thiếu dấu ';' khi kết thúc 1 lệnh, sửa: Use crt;
Var a, b: interger;
c: integerl; -> Sai tên kiểu dữ liệu, sửa: c: integer;
Begin
Clrscr;
a: = 10;
b = 3; -> lệnh gán sai, sửa: b:=3;
c: = a/b -> thiếu ';' khi kết thúc 1 câu lệnh sửa: c:=a/b;
Writeln(‘Gia tri cua c = ‘,c);
Readln;
End -> kết thúc thiếu dấu '.'. sửa: End.
Ai giải được thì giúp mình giải bài này đi, mình cần đáp án đúng ngay lập tức đây