Сообщения

Сообщения за декабрь, 2017

Опрацювання табличних велечин

Фрагмент процедури для обчислення суми значень усіх елементів табличної величини:  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 :=a[1]; nmax := 1; min :=a[1]; n:= 1; for i := 2 to 10 do  I...