Ответ: 7.
Решение смотри во вложении.
<h2>Заменить нечётные элементы по значению</h2>
program raf105;
var
a:array[1..20] of integer;
i,min: integer;
begin
min:= 10000;
writeln('Исходный массив:');
for i:=1 to 20 do
begin
a[i]:= random(-30,20);
writeln(a[i]);
if a[i]<min
then min:= a[i];
end;
writeln('Изменённый массив:');
for i:=1 to 20 do
begin
if (a[i] mod 2)<>0
then a[i]:= min;
writeln(a[i]);
end;
end.
<h2>Заменить нечётные элементы по индексу</h2>
program raf105;
var
a:array[1..20] of integer;
i,min: integer;
begin
min:= 10000;
writeln('Исходный массив:');
for i:=1 to 20 do
begin
a[i]:= random(-30,20);
writeln(a[i]);
if a[i]<min
then min:= a[i];
end;
writeln('Изменённый массив:');
for i:=1 to 20 do
begin
if (i mod 2)<>0
then a[i]:= min;
writeln(a[i]);
end;
end.
<h3><em><u>Язык PascalABC</u></em></h3>
Var n,m : Integer;
Begin
Write (' введите N: '); Readln (n);
Write (' введите M: '); Readln (m);
Writeln ((n+m)*(m-n+1) div 2);
end.
1Лук нарезать соломкой
2Мясо нарезать небольшими кусочками
3Морковь нарезать брусочками
4<span>В большом количестве растительного масла (около 150 мл) обжарить лук до золотистого цвета.
5</span><span>Добавить мясо, обжарить.
6</span><span>Добавить морковь, тушить 5-7 минут (крышкой не накрывать.)
7</span><span>Добавить зиру, барбарис, куркуму, посолить, поперчить, перемешать.
8</span><span>Налить воду так, чтобы она покрывала мясо. </span>
<span>Накрыть крышкой, тушить 35-40 минут, на среднем огне.
9</span><span>Рис промыть 5-6 раз, в холодной воде
10</span><span>Затем всыпать рис (с мясом НЕ перемешивать!), разровнять.
11</span>Аккуратно влить горячую или теплую воду
<span>12Немного посолить. </span>
<span>13Накрыть крышкой, варить до тех пор, пока рис не впитает воду.
14</span><span>В серединку положить чеснок, вдавить его в рис. </span>
15Деревянной палочкой сделать отверстия (рис и мясо не перемешивать) для выхода пара.
16Готовить под крышкой до готовности (около 20-25 минут).
<span>17Затем все перемешать и подавать к столу.</span>
112465145785185148+256645456589541122144
256757921735326307292
2.56757921735326*10^20
байт код: O8 6P 3K o7
