Program tinh;

Uses crt;

Var

a,b,tich,tong,hieu:Integer;

thuong:Real;

Begin

Clrscr;

Write('nhap so a la '); readln(a);

Write('nhap so b la ‘); readln(b);

tong:=a+b;

hieu:=a-b;

tich:=a*b;

thuong:=a/b;

Writeln('tong cua 2 so do la ' ,tong);

Writeln('hieu cua 2 so do la ' , hieu );

Writeln('tich cua 2 so do la ',tich);

Writeln('thuong cua 2 so do la ' ,thuong:10:2);

Readln;

End.