Nhập x. Tính y=(x+e^x) /(x-3) Môn Tin 11 Giúp cần gấp
2 câu trả lời
uses crt;
var x, y : real;
begin
clrscr;
writeln('Nhap so x : '); readln(x);
y := (x + exp(x)) / (x - 3);
writeln('Gia tri bieu thuc y = ', y : 2 : 1);
readln
end.
Program bai_tap;
Uses crt;
Var x,y: real;
Begin
Writeln ('Nhap x=');
Readln (x);
y:= (x+ exp(x))/(x-3);
Writeln ('y=', y:8:2);
Readln
End.
Câu hỏi trong lớp
Xem thêm