Question

Cho chương trình sau, tìm lỗi sai và sữa lại cho đúng:

Program kiem tra;

Var a,b:integer

Const Tong=integer

Begin

Write('Nhap so a=');

Readln(a);

Write('Nhap so b=');

Readln(b)

Tong=a+b;

Writeln('Tong cua ca a va b la ' ,Tong):

Readln

End.

Answer 1

Program kiem tra;

Var a,b:integer -> thêm ; ở cuối

Const Tong=integer -> khai báo sai -> tong: integer;

Begin

Write('Nhap so a=');

Readln(a);

Write('Nhap so b=');

Readln(b) -> thiếu ; ở cuối dòng

Tong=a+b;

Writeln('Tong cua ca a va b la ' ,Tong):

Readln

End.