fork download
copy 
  1. var 
  2. x, y:real; 
  3. begin 
  4. writeln('Vvedit x'); 
  5. read(x); 
  6. y:= (sin(sqr(x)-4) + 2) / cos(3*x);
  7. writeln('y=', y:8:4); 
  8. readln 
  9. end.
Success #stdin #stdout 0s 4532KB
comments (?)
stdin
copy 
1
stdout
copy 
Vvedit x
y= -1.8777
https://ideone.com/SbWbGn
language:
Pascal (gpc 20070904)
created:
8 years ago
visibility:
public

Share or Embed source code

Discover > Sphere Engine API

The brand new service which powers Ideone!

Discover > IDE Widget

Widget for compiling and running the source code in a web browser!