Viết chương trình pascal nhâp vào 2 biến AB . Tính tổng AB , hiệu AB , xuất tổng hiệu lên màn hình

Cách 1 :

uses crt;
var a,b,tong,hieu:longint;
begin
clrscr;
write('Nhap vao A = ');readln(a);
write('Nhap vao B = ');readln(b);
tong := a+b;
hieu := a-b;
writeln('Tong cua hai so A va B la: ',tong);
writeln('Hieu cua hai so A va B la: ',hieu);
readln
end.


Cách 2:

uses crt;
var a,b:longint;
begin
clrscr;
write('Nhap vao A = ');readln(a);
write('Nhap vao B = ');readln(b);
writeln('Tong cua hai so A va B la: ',a+b);
writeln('Hieu cua hai so A va B la: ',a-b);

đây ạ MONG ĐÁNH GIÁ CTLHN Ạ

var a,b:longint;
begin
write('Nhap vao a = ');readln(a);
write('Nhap vao b = ');readln(b); 
writeln('Tong = ',a+b);
writeln('Hieu = ',a-b);
readln;
end.