fork download
copy 
  1. program PA05_POT;
  2.  
  3. const
  4.   S: Array[0..9] of String = ('0','1','6248','1397','64','5','6','1793','6842','19');
  5.  
  6. var
  7.   n,i,a,b: LongInt;
  8.  
  9. begin
  10.   ReadLn(n);
  11.   for i:=1 to n do
  12.     begin
  13.       ReadLn(a,b);
  14.       a:=a mod 10;
  15.       WriteLn(S[a,(b mod Length(S[a]))+1]);
  16.     end;
  17. end.
Runtime error #stdin #stdout #stderr 0s 9136KB
comments (?)
stdin
copy 
Standard input is empty
stdout
copy 
Standard output is empty
stderr
copy 
./prog: attempt to read past end of Input (error #454 at 402c74)
https://ideone.com/EAjUwn
language:
Pascal (gpc 20070904)
created:
5 years ago
visibility:
secret

Share or Embed source code

Discover > Sphere Engine API

The brand new service which powers Ideone!

Discover > IDE Widget

Widget for compiling and running the source code in a web browser!