 амоооооооо 
                                                02.03.2021 20:02
                                                
                                                амоооооооо 
                                                02.03.2021 20:02
                                             elllis 
                                                02.03.2021 20:01
                                                
                                                elllis 
                                                02.03.2021 20:01
                                             Lilo111111111 
                                                02.03.2021 20:01
                                                
                                                Lilo111111111 
                                                02.03.2021 20:01
                                             taniaselikova 
                                                02.07.2019 01:30
                                                
                                                taniaselikova 
                                                02.07.2019 01:30
                                             kotikdo5 
                                                23.01.2021 13:17
                                                
                                                kotikdo5 
                                                23.01.2021 13:17
                                             thenotoriioussmma 
                                                23.01.2021 13:17
                                                
                                                thenotoriioussmma 
                                                23.01.2021 13:17
                                             ЮкиНайи 
                                                23.01.2021 13:14
                                                
                                                ЮкиНайи 
                                                23.01.2021 13:14
                                             Artemmmmhdjm 
                                                10.03.2019 12:50
                                                
                                                Artemmmmhdjm 
                                                10.03.2019 12:50
                                             lehmannastyaaovt8b2 
                                                17.04.2020 12:46
                                                
                                                lehmannastyaaovt8b2 
                                                17.04.2020 12:46
                                            
N,i:integer;
S:real;
Begin
Write('N = ');
ReadLn(N);
S:=0;
i:=1;
While i <= N do
Begin
S:=S+1/(i*i);
i:=i+1
End;
WriteLn('S = ',S);
End.