language: Pascal (fpc) (fpc 2.2.0)
date: 102 days 9 hours ago
link:
visibility: public 
1
2
3
4
5
6
7

var 
a:array[1..1000] of longint;
b : integer;
begin 
readln(a[b]);
writeln(a[b]);
end.