fork download
copy 
  1. r=1
  2. n=15
  3. nie=0%% punk nie należący do koła
  4. tak=0%%punkt należący do koła 
  5. x=rand(1,1,n)*2-1
  6. y=rand(1,1,n)*2-1
  7.  
  8. r<=sqrt(x^2+y^2)
  9. for i=1:n
  10. r(i)
  11. if r(i)<=1
  12. tak=tak+1
  13. disp ('Punkt należy do koła o promieniu 1')
  14. else 
  15. disp ('punkt nie należy do koła o promieniu 1')
  16. nie=nie+1
  17. endif
  18. endfor
  19.  
  20.  
Success #stdin #stdout #stderr 0.06s 47404KB
comments (?)
stdin
copy 
Standard input is empty
stdout
copy 
r =  1
n =  15
nie = 0
tak = 0
x =

ans(:,:,1) =  0.17045
ans(:,:,2) = -0.30652
ans(:,:,3) =  0.60145
ans(:,:,4) = -0.68058
ans(:,:,5) = -0.038535
ans(:,:,6) =  0.40452
ans(:,:,7) = -0.48978
ans(:,:,8) = -0.14549
ans(:,:,9) =  0.035270
ans(:,:,10) =  0.32659
ans(:,:,11) =  0.84301
ans(:,:,12) =  0.82563
ans(:,:,13) =  0.0089588
ans(:,:,14) =  0.77894
ans(:,:,15) =  0.20192

y =

ans(:,:,1) = -0.16792
ans(:,:,2) =  0.52322
ans(:,:,3) =  0.34438
ans(:,:,4) = -0.40420
ans(:,:,5) = -0.66658
ans(:,:,6) =  0.74313
ans(:,:,7) = -0.74059
ans(:,:,8) = -0.48528
ans(:,:,9) = -0.35160
ans(:,:,10) =  0.97735
ans(:,:,11) =  0.55448
ans(:,:,12) = -0.49550
ans(:,:,13) = -0.54695
ans(:,:,14) = -0.0043720
ans(:,:,15) = -0.72014
stderr
copy 
error: for x^y, only square matrix arguments are permitted and one argument must be scalar.  Use .^ for elementwise power.
error: called from
    /home/QewAnw/prog.octave at line 8 column 2
https://ideone.com/16agTF
language:
Octave (octave 4.4.1)
created:
3 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!