алг 
нач 
вещ таб A[1:100] 
вещ S 
|квадрат(100, А) 
сумма (100, A, S) 
вывод S 
кон 
 
алг сумма (арг цел n, вещ таб A[1:n], рез вещ S)        | (А83) 
надо | S = сумма элементов таблицы A 
нач цел i 
S := A[1] 
нц для i от 2 до n 
S := S +A[i] 
кц 
кон 
 
 
 
