Впрограмме обрабатывается одномерный целочисленный массив а с индексами от 0 до 9. значения элементов равны 8; 5; 11; 4; 6; 9; 4; 10; 7; 8 соответственно, т.е. a[0]=8; a[1]=5 и т.д. определите значение переменной s после выполнения следующего фрагмента программы, записанного ниже на паскале k: =0; t: =0; for i: =0 to 9 do if a[i]> k then begin t: =k; k: =a[i] end else t: =a[i]; s: =k+t;
A: array of integer=(8, 5, 11, 4, 6, 9, 4, 10, 7, 8);
var
k, t, i, S: integer;
begin
k:=0; t:=0;
for i:=0 to 9 do
if A[i]>k then begin
t:=k;
k:=A[i]
end
else
t:=A[i];
S:=k+t;
writeln(S);
end.
ответ: 19