Опрацювання табличних величин
Фрагмент процедури для обчислення суми значень усіх елементів табличної величини : s := 0; for i := 1 to 10 do s := s + a[i]; Фрагмент процедури для знаходження кількості значень елементів табличної величини, що дорівнюють заданому числу: k := 0; for i := 1 to 10 do If a[i] = x Then k:= k+1; Фрагмент процедури для визначення, чи є задане число серед значень елементів табличної величини : f := false; for i := 1 to 10 do If a[i ] = x Then begin f := true ; break ; end ; Фрагмент процедури для визначення найбільшого значення серед елементів табличної величини: max := a[1]; for i := 2 to 10 do If a[i] > max Then max := a[i]; Фрагмент процедури для визначення найбільшого і найменшого елементів у табличній величині, значення всіх елементів якої різні, їх номерів та перестановки цих значень місцями: max :=