Cod sursa(job #1174438)

Utilizator sorin36lica sorin sorin36 Data 22 aprilie 2014 20:17:27
Problema Cifra Scor 0
Compilator fpc Status done
Runda Arhiva de probleme Marime 3.2 kb
var n,i,a,b:integer;
    c:string;
    f,g:text;
begin
 assign(f,'cifra.in');
 reset(f);
 assign(g,'cifra.out');
 rewrite(g);
 readln(f,n);
 for i:=1 to n do
 begin
  readln(f,c);
  val(c,a);
  if a>99 then
  b:=a mod 100
  else
  b:=a;
  if a=0 then writeln(g,0);
  if a=1 then writeln(g,1);
  if a=2 then writeln(g,5);
  if a=3 then writeln(g,2);
  if a=4 then writeln(g,8);
  if a=5 then writeln(g,3);
  if a=6 then writeln(g,9);
  if a=7 then writeln(g,2);
  if a=8 then writeln(g,8);
  if a=9 then writeln(g,7);
  if a=10 then writeln(g,7);
  if a=11 then writeln(g,8);
  if a=12 then writeln(g,4);
  if a=13 then writeln(g,7);
  if a=14 then writeln(g,3);
  if a=15 then writeln(g,8);
  if a=16 then writeln(g,4);
  if a=17 then writeln(g,1);
  if a=18 then writeln(g,5);
  if a=19 then writeln(g,4);
  if a=20 then writeln(g,4);
  if a=21 then writeln(g,5);
  if a=22 then writeln(g,9);
  if a=23 then writeln(g,6);
  if a=24 then writeln(g,2);
  if a=25 then writeln(g,7);
  if a=26 then writeln(g,3);
  if a=27 then writeln(g,6);
  if a=28 then writeln(g,2);
  if a=29 then writeln(g,1);
  if a=30 then writeln(g,1);
  if a=31 then writeln(g,2);
  if a=32 then writeln(g,8);
  if a=33 then writeln(g,1);
  if a=34 then writeln(g,7);
  if a=35 then writeln(g,2);
  if a=36 then writeln(g,8);
  if a=37 then writeln(g,5);
  if a=38 then writeln(g,9);
  if a=39 then writeln(g,8);
  if a=40 then writeln(g,8);
  if a=41 then writeln(g,9);
  if a=42 then writeln(g,3);
  if a=43 then writeln(g,0);
  if a=44 then writeln(g,6);
  if a=45 then writeln(g,1);
  if a=46 then writeln(g,7);
  if a=47 then writeln(g,0);
  if a=48 then writeln(g,6);
  if a=49 then writeln(g,5);
  if a=50 then writeln(g,5);
  if a=51 then writeln(g,6);
  if a=52 then writeln(g,2);
  if a=53 then writeln(g,5);
  if a=54 then writeln(g,1);
  if a=55 then writeln(g,6);
  if a=56 then writeln(g,2);
  if a=57 then writeln(g,9);
  if a=58 then writeln(g,3);
  if a=59 then writeln(g,2);
  if a=60 then writeln(g,2);
  if a=61 then writeln(g,3);
  if a=62 then writeln(g,7);
  if a=63 then writeln(g,4);
  if a=64 then writeln(g,0);
  if a=65 then writeln(g,5);
  if a=66 then writeln(g,1);
  if a=67 then writeln(g,4);
  if a=68 then writeln(g,0);
  if a=69 then writeln(g,9);
  if a=70 then writeln(g,9);
  if a=71 then writeln(g,0);
  if a=72 then writeln(g,6);
  if a=73 then writeln(g,9);
  if a=74 then writeln(g,5);
  if a=75 then writeln(g,0);
  if a=76 then writeln(g,6);
  if a=77 then writeln(g,3);
  if a=78 then writeln(g,7);
  if a=79 then writeln(g,6);
  if a=80 then writeln(g,6);
  if a=81 then writeln(g,7);
  if a=82 then writeln(g,1);
  if a=83 then writeln(g,8);
  if a=84 then writeln(g,4);
  if a=85 then writeln(g,9);
  if a=86 then writeln(g,5);
  if a=87 then writeln(g,8);
  if a=88 then writeln(g,4);
  if a=89 then writeln(g,3);
  if a=90 then writeln(g,3);
  if a=91 then writeln(g,4);
  if a=92 then writeln(g,0);
  if a=93 then writeln(g,3);
  if a=94 then writeln(g,9);
  if a=95 then writeln(g,8);
  if a=96 then writeln(g,0);
  if a=97 then writeln(g,7);
  if a=98 then writeln(g,1);
  if a=99 then writeln(g,0);
end;
 close(f);
 close(g);
end.