Все 4 задачи в файле "PAS" которые находятся под этим сообщением. Будут вопросы, задавайте в ЛС
2 в 7-й степени то есть 128. Стандартная формула для нахождения глубины цвета. Ответ: 128
Отве чёрный форд
третий человек прав что машина не синяя значит она чёрная но так как второй человек не прав в цвете то он прав в марке машины
Ответ:
а и б
Объяснение:
Просто подставь значения из таблицы и сморишь чтобы везде ответ был 1
Program picaso; uses crt;var i,n,ls,ld,min,max,temp,k,j,f,aux:integer;<span> a:array[1..10] of integer;</span>begin clrscr; <span> writeln('Vedite dlinu masiva');read(n);</span><span> writeln('Vedite granitu s leva');read(ls);</span><span> writeln('Vedite granitu s prava');read(ld);</span><span> for i:=1 to n do </span><span> begin</span><span> write('A[',i,']=');</span><span> readln(a[i]);</span><span> end;</span><span> min:=a[1];max:=a[1];</span><span> repeat</span><span> f:=1;</span><span> for i:=ls to ld-1 do</span><span> if a[i]<a[i+1] then </span><span> begin </span><span> aux:=a[i]; </span><span> a[i]:=a[i+1]; </span><span> a[i+1]:=aux; </span><span> f:=0; </span> end; until f=1; <span> for i:=ls to ld do</span><span> write(a[i]:3);</span><span> writeln;</span><span> writeln('min: ',a[ls],' max: ',a[ld]);</span><span> aux:=a[ls]; </span><span> a[ls]:=a[ld]; </span><span> a[ld]:=aux; </span><span> for i:=ls to ld do</span><span> write(a[i]:3);</span> end.<span>
</span>