program ellenallat;
uses crt;
var e,m,h,o:longint;
begin
writeln ('kerem az elso ‚s a masodik  sav szinet  ');
writeln ('0fekete 1barna 2piros 3narancs 4sarga 5zold 6kek 7lila 8szurke 9feher');
readln(e);
readln(m);
if (e<1) then o:=e+m;
if (e>0) then o:=e*10+m;
writeln ('kerem a harmadik sav szinet');
readln(h);
if (h=0) then o:=o;
if (h=1) then o:=o*10;
if (h=2) then o:=o*100;
if (h=3) then o:=o*1000;
if (h=4) then o:=o*10000;
if (h=5) then o:=o*100000;
if (h=6) then o:=o*1000000;
if (h=7) then o:=o*10000000;
if (h=8) then o:=o*100000000;
if (h=9) then o:=o*1000000000;
writeln ('az ellenallas erteke:            ',o,'ohm'     );
readkey;
end.