#include <stdio.h>
/ Use of a COMMON Block from Fortran /
struct {
int i ; float r ;
} com;
void init_read () ;
int main ()
{
init_read ( ) ;
printf ( "%4d%10.3f \n" , com.i , com.r ) ;
return 0 ;
}