#include<stdio.h>
#include<string.h>
#include<stdlib.h>
#include<assert.h>

int iu,iu2,i,j,pocet=0,prvni=1;
long long u,u2,l1,l2,l3;
float c,sum;
char a[1000];
long long ucty[10000];
float castky[10000];

void reset() {
    int i;
    for(i=0;i<10000;i++) {
	castky[i]=-1;
    }
    pocet=0;
}

void pisl(long long i,int mista,char co) {
    int d;
    char a[100];
    sprintf(a,"%lld",i);
    d=strlen(a);
    d=mista-d;
    while(d--)putchar(co);
    printf("%lld",i);
}
int najdi(long long u) {
    int i;
    for(i=0;i<pocet;i++){
	if (ucty[i]==u) return i;
    }
    return -1;
}

int main(void){
    
    char a[10];



    reset();
    
    while(1){
	
	if(!prvni){
	    printf("\n");
	} else
	    prvni=0;
        
	a[0]=0;
	scanf(" %s ",a);
	if (a[0]==0)break;
	if (a[0]=='Z') {
	    scanf("%lld",&u);
  	    printf("Ucet ");
	    pisl(u,10,'0');
	    if((iu=najdi(u))!=-1) {
		printf(" uz existuje.\n");
		continue;
	    } else {
		printf(" vytvoren.\n");
		castky[pocet]=0;
		ucty[pocet]=u;
		pocet++;
	    }
	} else if(a[0]=='U') {
	    
	    scanf("%lld %f",&u,&c);
  	    if ((iu=najdi(u))==-1){
		printf("Ucet ");
		pisl(u,10,'0');
		printf(" neexistuje.\n");
		continue;
	    }
	    printf("Ulozeno %.2f na ucet ",c);
	    
	    pisl(u,10,'0');
	    printf(".\n");
	    castky[iu]+=c;
	}else if(a[0]=='V'){
	    scanf("%lld %f",&u,&c);
  	    if ((iu=najdi(u))==-1){
		printf("Ucet ");
		pisl(u,10,'0');
		printf(" neexistuje.\n");
		continue;
	    }
	    if (castky[iu]<c) {
		printf("Nedostatek penez.\n");
		continue;
	    }
	    castky[iu]-=c;
	    printf("Vybrano %.2f z uctu ",c);
	    pisl(u,10,'0');
	    printf(".\n");
	    
	}else if(a[0]=='P') {
	    scanf("%lld %lld %f",&u,&u2,&c);
  	    i=0;
	    if ((iu=najdi(u))==-1){
		printf("Ucet ");
		pisl(u,10,'0');
		printf(" neexistuje.\n");
		i=1;
	    } else {
		if(castky[iu]<c) {
		    printf("Nedostatek penez.\n");
		    i=1;
		}
	    }
	    if ((iu2=najdi(u2))==-1){
		printf("Ucet ");
		pisl(u2,10,'0');
		printf(" neexistuje.\n");
		i=1;
	    }
	    if (i) continue;
	    printf("Prevedeno %.2f z uctu ",c);
	    pisl(u,10,'0');
	    printf(" na ucet ");
	    pisl(u2,10,'0');
	    printf(".\n");
	    
	    castky[iu2]+=c;
	    castky[iu]-=c;
	}else if (a[0]=='S') {
	    printf("pocet uctu: %d\n",pocet);
	    printf("Celkem:     ");
	    sum=0;
	    
	    for (i=0;i<pocet;i++) {
		sum+=castky[i];
	    }
	    i=(int)sum;
	    pisl(i,7,' ');
	    c=sum-i;
	    sprintf(a,"%.2f",c);
	    printf("%s\n",&a[1]);
	    
	}else if(a[0]=='L') {
	    printf("Pocet uctu: %d\n",pocet);
	    for(j=0;j<pocet;j++) {
		pisl(ucty[j],10,'0');
		putchar(' ');
		i=(int)castky[j];
		pisl(i,7,' ');
		c=castky[j]-i;
		sprintf(a,"%.2f",c);
		printf("%s\n",&a[1]);
	    }
	    printf("Celkem:     ");
	    sum=0;
	    for (i=0;i<pocet;i++) {
		    sum+=castky[i];
	    }
	    i=(int)sum;
	    pisl(i,7,' ');
	    c=sum-i;
	    sprintf(a,"%.2f",c);
	    printf("%s\n",&a[1]);

		
	    
	    
	} else if (a[0]=='R') {
	    reset();
	    printf("Reset systemu.\n");
	}else break;
    
    }
    printf("Konec.\n");

    return 0;
}