L
longhama6a2


sai hay đúng và sửa lại
a/if x>5 then a:=b;else m:=n
2/cho đoạn ct:tìm chỗ sai
Program Chuongtrinh;
Var i,s:real;
Const n=10;
begin
while i<=n do;
begin
S:=s+i
i:=i+1
end.
writeln(s)
readln
end
nhớ xem cụ thể và sửa nhưng phải nói được tại sao chỗ đó sai nhá(mới thuyết phục ak)
a/if x>5 then a:=b;else m:=n
2/cho đoạn ct:tìm chỗ sai
Program Chuongtrinh;
Var i,s:real;
Const n=10;
begin
while i<=n do;
begin
S:=s+i
i:=i+1
end.
writeln(s)
readln
end
nhớ xem cụ thể và sửa nhưng phải nói được tại sao chỗ đó sai nhá(mới thuyết phục ak)