B. Var a, b, tong, tich: integer;

vì câu B đúng cú pháp, đầy đủ biến, dữ liệu

Vt chg trình: 

uses crt;

var a, b, tong, tich: integer;

begin

write('nhap a:');realdn(a);

write('nhap b:');realdn(b);

tong:=a+b;

tich:=a*b;

writeln('tong=',tong);

writeln('tich=',tich);

readln;

end.

Viết chương trình nhập vào hai số nguyên và tính tổng, tích

program bai_giai;

uses crt;

var a,b,tong, tich:longint;

begin

clrscr;

write('nhap hai so a,b:');readln(a,b);

tong:=a+b;

tich:=a*b;

writeln('tich:=',tich);

write('tong:=',tong);

readln;

end.

Hãy viết phần khai báo?
A. Var a, b, tong, tich:= real;
B. Var a, b, tong, tich: integer;
C. Var a, b, tong, tich: real;
D. Var a, b, tong, tich:= integer;