Cod sursa(job #844413)
Utilizator | Data | 29 decembrie 2012 11:59:05 | |
---|---|---|---|
Problema | A+B | Scor | 0 |
Compilator | fpc | Status | done |
Runda | Arhiva de probleme | Marime | 0.1 kb |
var x,y:integer;s:real;
begin
write('Dati x,y=');
read (x,y);
s:=x/y;
write (s:4:2);
readln;
end.