Question

Ai giải chi tiết bài pascal này với ạ, em đang kiểm tra ạ

Answer 1

program dung;

uses crt;

var x: integer'

t: real;

begin

clrscr;

write('x= '); readln(x);

t:=(5*x-7)+sqrt(3*x*x+7*x-6);

write('Dien tich la: ',s:1:2);

write('Ket qua: ',t);

readln;

end.