program p4N1; {$APPTYPE CONSOLE} var a,t,r:real; begin writeln('vvedit skiki vazut tort(kilogramu) i skiki vazut odna portsia(gramu)'); readln(t,r); t:=t*1000; a:=t/r; writeln('mozna prugostutu bilshe niz',a:5:0,' druziv ale tortu vustathit na',a:5:0,' gostey'); readln; end.