Для a[i] = i, i = 1, 2, 3 фрагмент вида:

[email protected] в категроии Информатика, вопрос открыт 19.02.2018 в 11:55

j := 1;
i := 3;
while (i > 1) do
begin
if (а [i] > а [j]) then
j := i;
i := i – 1;
end;
write(i,j);
выведет на экран значения i и j в указанной последовательности:
Вариант 1. 3, 2
Вариант 2. 2, 2
Вариант 3.1, 3