#include <stdio.h>
struct ucet{
  float castka;
  int cislo;
};

ucet pole[10000];
char prik[100];
int pocetUctu,i,ii;
bool mam;

int main()
{
  int c_ucet;
  float suma;
  pocetUctu = 0;    
  while(1){
  prik[0] = 0;
  scanf("%s",prik);
  if (!(*prik))
  {
     printf("Konec.\n");
     return 0;
  }
  switch((int)*prik){
  case 'Z': 
      mam = false;
      scanf("%d", &c_ucet);
      for(i=0;i<pocetUctu;i++)
      {
	if(c_ucet==pole[i].cislo)
	{
	     printf("Ucet %010d uz existuje.\n",c_ucet);
	     mam = true;
	     break;
	}	
      }
      if (!mam)
      {
          pole[pocetUctu].castka = 0;
          pole[pocetUctu++].cislo = c_ucet;
          printf("Ucet %010d vytvoren.\n",c_ucet);
      }
      break;
  case 'U':
      scanf("%d%f", &c_ucet, &suma);
      mam = false;
      for(i=0;i<pocetUctu;i++)
      {
	if(c_ucet==pole[i].cislo)
	{
	     printf("Ulozeno %.2f na ucet %010d.\n",suma,c_ucet);
	     pole[i].castka += suma;
	     mam = true;
	     break;
	}	
      }      
      if (!mam)
      {
          printf("Ucet %010d neexistuje.\n",c_ucet);
      }
      break;
  case 'V':
      scanf("%d%f", &c_ucet, &suma);
      mam = false;
      for(i=0;i<pocetUctu;i++)
      {
	if(c_ucet==pole[i].cislo)
	{	    
	    if (suma <= pole[i].castka)
	    {		
	      printf("Vybrano %.2f z uctu %010d.\n",suma,c_ucet);
	      pole[i].castka -= suma;	  
	      mam = true;   	
	    }
	    else
	    {
	      printf("Nedostatek penez.\n");
	      mam = true;
	    }
	    break;
	}	
      }      
      if (!mam)
      {
          printf("Ucet %010d neexistuje.\n",c_ucet);
      }
      break;
   case 'P':
       int kam;
	mam = false;
      scanf("%d%d%f", &c_ucet, &kam
      , &suma);
      for(i=0;i<pocetUctu;i++)
      {
	if(c_ucet==pole[i].cislo)
	{
	    if (pole[i].castka <= suma)
	    {
		printf("Nedostatek penez.\n");
		
		for(ii=0;ii<pocetUctu;ii++)
                {
	          if(kam==pole[ii].cislo)
	          { 	           
		   mam = true;
		   break;
	          }
	        }
		if (!mam)
		{
		printf("Ucet %010d neexistuje.\n",kam);		
		}
		mam = true;
		break;
	    }
	    for(ii=0;ii<pocetUctu;ii++)
            {
	       if(kam==pole[ii].cislo)
	       {
	           pole[i].castka -= suma;
		   pole[ii].castka += suma;
		   printf("Prevedeno %.2f z uctu %010d na ucet %010d.\n",suma,c_ucet,kam);
		   mam = true;
		   break;
	      }
	    }
	    if (!mam)
	    {
		printf("Ucet %010d neexistuje.\n",kam);
		mam = true;
		break;
	    }
	}
     } // k for s i	
     if (!mam)
     {
         mam = false;
	 printf("Ucet %010d neexistuje.\n",c_ucet);
	 for(ii=0;ii<pocetUctu;ii++)
                {
	          if(kam==pole[ii].cislo)
	          { 	           
		   mam = true;
		   break;
	          }
	        }
		if (!mam)
		{
		printf("Ucet %010d neexistuje.\n",kam);		
		}
     }
     break;
  case 'S':    
     printf("Pocet uctu: %d\n",pocetUctu);
     suma = 0;
     for(i = 0; i < pocetUctu; i++)
     {
       suma += pole[i].castka;
     }
     printf("Celkem:     %10.2f\n",suma);
     break;
  case 'L':
     printf("Pocet uctu: %d\n",pocetUctu);
     suma = 0;
     for(i = 0; i < pocetUctu; i++)
     {
       printf("%010d %10.2f\n",pole[i].cislo,pole[i].castka); //!!!!!!!!!!!!1
     }
     for(i = 0; i < pocetUctu; i++)
     {
       suma += pole[i].castka;
     }
     printf("Celkem:     %10.2f\n",suma);
     break;
  case 'R':
      printf("Reset systemu.\n");
      pocetUctu = 0;
      break;
}//switch
printf("\n");
}//while
}