language: Icon (iconc 9.4.3)
date: 604 days 21 hours ago
link:
visibility: public 
1
2
3
4
5
6
7
8
9

procedure main()
v:=read();
v:=v*v*48/1000;
a:=v/10;
a:=a*10;
a:=v-a;
v:=v/10;
write(v,".",a);
end
Translating:
prog.icn:
  main
No errors
Linking: