Question

Hãy liệt kê các lỗi, điền từ khuyết, sắp xếp lại các câu lệnh trong chương trình sau:

1. Program Bai11;

2. ........ crt;

3. ........ a,b,H:integer;

4. ........ c=12;

5.Begin

6. Clrscr;

7. write('nhap a='); Readln(a);

8. write('nhap b='); ...........(b)

9. H:=a*a+b*b+c;

10. Readln;

11. Writeln('H=',H);

12. .......

Answer 1

1. Program Bai11;

2. ....Uses.... crt;

3. ...Var..... a,b,H:integer;

4. ....Const.... c=12;

5.Begin

6. Clrscr;

7. write('nhap a='); Readln(a);

8. write('nhap b='); ......Readln.....(b);

9. H:=a*a+b*b+c;

10. Readln;

11. Writeln('H=',H);

12. ....End....