fork download
copy 
  1. Program excursion;
  2.  
  3. var
  4.     N,K, S : LongInt;
  5.     R       : AnsiString;
  6.  
  7. begin
  8. {
  9.     uncomment the two following lines if you want to read/write from files
  10.     assign(input,  'input.txt');  reset(input);
  11.     assign(output, 'output.txt'); rewrite(output);
  12. }
  13.  
  14.     ReadLn(N);
  15.  
  16.     ReadLn(K);
  17.  
  18.     ReadLn(S);
  19.  
  20.     R := '';
  21.  
  22.    if K*N>=S then R:='YES'
  23.              else R:='NO';
  24.     WriteLn(R);
  25.  
  26. end.
  27.  
Success #stdin #stdout 0s 5272KB
comments (?)
stdin
copy 
8
50
375
stdout
copy 
YES
https://ideone.com/BeKu8D
language:
Pascal (fpc 3.0.4)
created:
15 hours 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!