Гномы, жители страны мории, добывают драгоценные - вопрос №10309443 от Wlig123 02.08.2020 21:58

Question

Информатика: Гномы, жители страны мории, добывают драгоценные камни трех видов — поделочные (вид a), полудрагоценные (вид b) и драгоценные (вид c). хранят их гномы в одинаковых коробках, каждую из которых наполняют только одним видом камней. заполненные коробки гномы складывают в огромных залах мории одну на другую так, что получаются вертикальные стопки. самые «плохие» стопки гномы оркам. стопка считается плохой, если в ней подряд лежат более одной коробки, заполненной камнями вида a. стопка считается «хорошей»,

Wlig123 · Answer

Консольное приложение:const n=9; var l:array[1..n] of integer;i,max,imax,min,imin,s:integer; beginRandomize;writeln( Массив L: );for i:=1 to n do begin l[i]:=random(51); write(l[i]:4); end;writeln;max:=l[1]; imax:=1;min:=l[1]; imin:=1;for i:=2 to n do begin if l[i] max then begin max:=l[i]; imax:=i; end; if l[i] min then begin min:=l[i]; imin:=i; end; end;writeln( max = l[ ,imax, ] = ,max);writeln( min = l[ ,imin, ] = ,min);s:=0;if imax imin then for i:=imin+1 to imax-1 do s:=s+l[i] else for i:=imax+1...