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