$#QLinkVNxWCDI$

(1)----------------------

program qlinkvn;

uses crt;

var a,b,c,d: integer;

begin

clrscr;

writeln('Nhap gia tri a: '); readln(a);

writeln('Nhap gia tri b: '); readln(b);

c:=a-b;

d:=a*b;

writeln('Hieu hai so la: ',c);

write('Tich hai so la: ',d);

readln;

end.

(2)----------------------

Xem hình ạ (theo thứ tự với giá trị nhập vào luôn ạ)

1)

program tinh;

uses crt;

var a, b, h, t : integer;

begin

clrscr;

write('nhap so a :');readln(a);

write('nhap so b :');readln(b);

h := a- b;

t := a*b;

writeln(' hieu hai so ', a ,' va ', b ,' la :', h );

writeln(' tich hai so ', a ,' va ', b ,' la :', t );

readln

end.