Var a,b,s:real;
Begin
Write('Nhap a = ');readln(a);
Write('Nhap b = ');readln(b);
s:=a+b;
Write('Tong la ',s:10:2);
Readln;
End.
_______________________________________________
Var a,b,s:real;
Begin
Write('Nhap a = ');readln(a);
Write('Nhap b = ');readln(b);
s:=a*b;
Write('Tich la ',s:10:2);
Readln;
End.
Sửa bởi: MinhLe