Hãy viết 1 chương trình Pascal để tìm kết quả của biểu thức sau: (x-2)^2(x+2)+(x+2),x là số được nhập từ bàn phím.Sau đó in ra màn hình kết quả của biểu thức.
Hãy viết 1 chương trình Pascal để tìm kết quả của biểu thức sau: (x-2)^2(x+2)+(x+2),x là số được nhập từ bàn phím.Sau đó in ra màn hình kết quả của biểu thức.
Program tinh;
uses crt;
var s,x:integer;
Begin
clrscr;
write(‘Nhap x: ‘); readln(x);
s:=(x-2)*(x-2)*(x+2)+(x+2);
write(‘Ket qua: ‘,s);
readln;
End.
uses crt;
var x:integer;
begin
clrscr;
write(‘nhap x: ‘); readln(x);
write(‘gia tri cua bieu thuc la: ‘,(x-2)*(x-2)*(x+2)+(x+2));
readln;
end.