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.