//Ответ: 133.
//PascalABC.NET
var
i: integer;
begin
i := 0;
while(true) do
begin
if((i mod 7 = 0) and (i mod 3 <> 0) and (i mod 10 = 3)) then break;
i := i + 1;
end;
write(i);
<span>end.</span>
8^1050 = 2^3150 В 2с/с это 1 и 3150 штук нулей
4^1020=2^2040 в 2с/с это 1 и 2040 штук нулей
При вычитании этих чисел в 2с/с результатом будет число, начинающееся
с таким количеством единиц: 3150-2040 = 1110 единиц и остальное -нули.
Число 17 в 10с/с = 10001 в 2с/с , при сложении с ранее полученным числом, даёт ещё две единицы
Итого: 1110+2= 1112 единицы - ответ
Ответ: кратчайший путь A-C-F (3).
Решение ниже:
Var a, b : integer;
Begin
Write('Введите число а: ');
Readln(a);
Write('Введите число b: ');
Readln(b);
If a < b then begin
A := 0;
B := a * b;
Write('a = ', a, 'b = ', b);
End
Else
Begin
B := 0;
A := a * b;
Write('a = ', a, 'b = ', b);
End;
End.
1.Глаза - зрительная, уши - звуковая, нос - запах, язык - вкус
2.<span>Структурированность и компактность.
3.</span><span>Доступность, понятность, возможность проверки, объёмность.
4.Д</span><span>остоверная, понятная и полезная(актуальная).</span>