Var
mas:array[1..100] of integer;
min,i:integer;
begin
for i:=1 to 10 do
read(mas[i]);
min:=mas[1];
for i:=2 to 10 do
if mas[i]<min then
min:=mas[i];
mas[10]:=min;
for i:=1 to 10 do
write(mas[i],' ');
end.
<h2>Пример (при A, B, C = 0)</h2>
- false && false || false = <u>false</u>
- false || (true || false) = false || true = <u>true</u>
- true || (false && false) = true || falce = <u>true</u>
- (false && false) || (false && false) = false || false = <u>false</u>
- (false || false) || (false || falce) = false || false = <u>false</u>
В задание должны быть варианты расстановки символов азбуки Морзе, ты их не привёл(-а), так что решить это невозможно.
Блок-схема решения задачи 2 - в прилагаемом файле.
<span> x=154 в начале
a:=x div 100; 154 div 100 = 1 (деление нацело), a = 1
b:=x mod 100; 154 mod 100 = 54 (остаток от деления нацело), b = 54
c:=x mod 10; 154 mod 10 = 4, c=4
s:=a+b+c; 1+54+4 = 59, s=59.
Ответ: 59 </span>