Алгоритми опрацювання табличних величин. Складання і виконання алгоритмів знаходження сум і кількостей значень елементів табличних величин

підрахунок елементів

багаторядкове текстове поле

форма

елемент керування

var A: array[1..25] of Integer;

var A: array[1..10] of Integer;;

var A: array[1..25] of Real;

var A: Integer;

memo

array

const

real

integer

 Integer

 String

 Real

boolean

char

 Integer

String

Real

Char

Boolean

виводить результат у об'єкт поле

змінює назву кнопки

змінює назву форми

виводить результат у об'єкт напис

знаходить найменше значення масиву

находить кількість елементів масиву

знаходить найбільше значення масиву

знаходить суму елементів масиву

max:=A[i];

for i:=1 to n do

If max>A[i] then max:=A[i];

max:=A[1];

for i:=2 to n do

If max<A[i] then max:=A[i];

max:=A[1];

If max>i then max:=i;

max:=A[i];

for i:=1 to n do

If max<i then max:=i;