Два конца два кольца посередине гвоздик
Вокруг проруби под холмом сидят белы голуби
Оправа похожа на два обруча,два стекла похожи на два озера,а дужка похоже на мост
Function NOD(a, b: Integer): Integer;
Var tmp, r: Integer;
Begin
If b > a Then
Begin
tmp := a;
a := b;
b := tmp;
End;
tmp := a;
While tmp > 0 Do
Begin
Result := tmp;
tmp := tmp - b;
End;
<span><span>End;
<em>Пример программы с использованием данной функции:</em>
</span>Program Example;
Var a, b: Integer;
Function NOD(a, b: Integer): Integer;
Var tmp, r: Integer;
Begin
If b > a Then
Begin
tmp := a;
a := b;
b := tmp;
End;
tmp := a;
While tmp > 0 Do
Begin
Result := tmp;
tmp := tmp - b;
End;
End;
Begin
Write('a = ');
ReadLn(a);
Write('b = ');
ReadLn(b);
Write('НОД: ', NOD(a, b));
ReadLn;
<span>End.</span></span>
Подставим х=2.
(2<11) & (2<10)
(Истина) И (Истина)
Истина
8 цветов = 1 пиксель log2 8 = 3 бит
640 * 480 = 307200 пикс
307200 * 3 = 921600 бит
512 цветов = 1 пиксель log2 512 = 9 бит
921600 / 9 = 102400 пикс
Ответ:
70
Объяснение:
Дано условие "не (х<=71) или (х не делится на 7)" и требуется его ложность. Добавим к нему отрицание и будем искать истинность:
не (не (х<=71) или (х не делится на 7))
По закону де-Моргана избавимся от внешнего отрицания:
(х<=71) И НЕ (х не делится на 7), что равносильно
(х<=71) И (х делится на 7)
Итак, нужно найти такое наибольшее число, которое кратно 7 и не превышает 71.
71 не кратно 7, а следующее меньшее, 70 - кратно. Это и есть ответ.