Việt chương trình tính giá trị các biểu thức sau (x.y là các số nguyên được nhập vào từ bàn phim). Làm tròn tới 2 chữ số thập phân (test kết quả với x=2.y=3) b) (x - 1)/(5 ^ 2) + (x ^ 2)/y - (5 ^ 2 + 2)/(y - 3) a) x * y ^ 2 + 1/2 * x * y - 2 * (x ^ 2 + 10)/3

câu 1

Program Baitap;

Uses crt;

Var x,y:integer;

Begin

Clrscr;

Write('x='); Readln(x);

Write('y='); Readln(y);

Writeln('(x-1)/(5^2)+(x^2)/y-(5^2+2)/(y-3)=',(x-1)/(5*5)+(x*x)/y-(5*5+2)/(y-3):8:2);

Writeln('x*y^2+1/2*x*y-2*(x^2+10)/3=',x*y*y+1/2*x*y-2*(x*x+10)/3:8:2);

Readln;

End.

Program Baitap;

Uses crt;

Var x,y:integer;

Begin

Clrscr;

Write('x='); Readln(x);

Write('y='); Readln(y);

Writeln('(x-1)/(5^2)+(x^2)/y-(5^2+2)/(y-3)=',(x-1)/(5*5)+(x*x)/y-(5*5+2)/(y-3):8:2);

Writeln('x*y^2+1/2*x*y-2*(x^2+10)/3=',x*y*y+1/2*x*y-2*(x*x+10)/3:8:2);

Readln

End.