Hãy viết phươ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ố nhập từ bàn phím . Sau đó in ra màn hình kết quả của biểu thức
Mn giúp em với ạ em đang cần gấp
Ghi rõ rõ cho em xíu ạ
Hãy viết phươ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ố nhập từ bàn phím . Sau đó in ra màn hình kết quả của biểu thức
Mn giúp em với ạ em đang cần gấp
Ghi rõ rõ cho em xíu ạ
Theo đúng đề:
program bieu_thuc;
uses crt;
var x:integer;
begin
clrscr;
write(‘Nhap x: ‘); readln(x);
write(‘Ket qua: ‘,(x-2)*(x-2)*(x+2)+(x+2));
readln;
end.
Nếu là: (x-2)^2 *(x+2) * (x+2)
program bieu_thuc;
uses crt;
var x:integer;
begin
clrscr;
write(‘Nhap x: ‘); readln(x);
write(‘Ket qua: ‘,(x-2)*(x-2)*(x+2)*(x+2));
readln;
end.
uses crt;
var x:integer;
begin
clrscr;
write(‘Nhap 1 so nguyen: ‘); readln(x);
write(‘Ket qua bieu thuc: ‘,(x-2)*(x-2)*(x+2)+(x+2));
readln;
end.