Sửa lỗi cho các câu lệnh sau:
Var x: real;begin for x:=1 do writeln('A');end.
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.
a, var start , begin : real ;
( tên biến không được trùng với từ khóa)
=> var start, biến bất kì (vd: a, b, c..):real;
b, const x : = 3 . 14 , y : 1000 ;
( khai báo hằng phải dùng dấu "=", giữa các hằng phải được ngăn cách = dấu chấm phẩy)
=> const x=3.14; y=1000;
c, var a : 5 ;
(khai báo biến là khai báo kiêu dữ liệu của biến chứ không khai báo giá trị của biến)
=> var a: kiểu dữ kiệu bất kì (vd: integer, real,...);
d, const ten lop = ' 8a2 ' ;
(tên hằng không được chứa ký tự đặc biệt);
=> const ten_lop (tenlop) = '8a2';
e, var xep _ loại , diem : integer , real ;
(tên biến không được chứa ký tự đặc biệt và không có dấu, không được khai báo 1 biến mà nhiều kiểu dữ liệu)
=> var xep_loai, diem:integer (real) ;
f, var nguyen 1 , nguyen 2 , : integer , thuc 1 , thuc 2 , : real ;
( tên biến không được chứa ký tự đặc biệt, dư dấu phẩy, giữa các kiểu khai báo biến phải ngăn cách = dấu chấm phẩy)
=>var nguyen1 (nguyen_1), nguyen2 (nguyen_2) : integer; thuc1( thuc_1), thuc2 (thuc_1) : real;
g, const 3 ban = ' Phan ' , ' Tuan ' , ' Thanh ' ;
(tên hằng k được bắt đầu = chữ số, các giá trị phải ghi chung chứ k ghi riêng)
=> const ten3ban = 'Phan, Tuan, Thanh';
h, const tên _ nhom = Tin hoc ;
( tên hằng không chứa ký tự đặc biệt và không có dấu, giá trị là chữ thì phải đặt trong dấu ' ')
=>const ten_nhom='Tin hoc';
chúc bạn học tốt!!
Var cv, dt : integer
r : real;
Const pi = 3.14;
Begin
r = 5.5;
dt := pi*r*r;
writeln(‘Dien tich hinh tron la:,dt:8:2’);
readln
End.
Sửa :
Var x: byte;
begin
for x:=1 do 10 do
writeln('A');
end.