Впаскале: найти количество пар элементов в заданном - вопрос №19787663 от temik261 12.01.2021 03:51

Question

Информатика: Впаскале: найти количество пар элементов в заданном массиве из 10 целых чисел для которых выполнено условие, что a [i] = a [i+2]

temik261 · Answer

var array1: array [1..10] of integer;    a, i: integer;begin    a:= 0;    for i:= 1 to 8 do begin        if array[i] = a[i + 2] then a = a + 1;    end;    writeln(a);end....