Десятичная двоичная восьмеричная шестнадцатиричная
1)
10 1010 12 A
18 10010 22 12
322 101000010 502 142
2)
10 1010
74 112
92 5C
Числа снизу обозначают систему счисления
и какая вероятность что пользователь не ошибется?)))
program i_guess_number;
uses crt;
var changes: array [1..2,1..10] of integer;
i,op,n:integer;
s:string;
res:real;
BEGIN
randomize;
writeln("Загадайте число");
n := 0;
repeat
n := n+1;
i := random(10);
op := random(4);
case op of
1: s := "Прибавте ";
2: s := "Отнимите ";
3: s := "Умножте на ";
else s := "Поделите на ";
end;
writeln(s, i);
changes[1,n] := op; {запоминаем действия}
changes[2,n] := i;
until n = 10;
writeln("Что вышло?");
readln(res);
for i := n downto 1 do { производим обратные действия }
begin
case changes[1,i] of
1: res := res - changes[2,i];
2: res := res + changes[2,i];
3: res := res / changes[2,i];
else res := res * changes[2,i];
end;
end;
writeln("Вы загодали ",res);
END.
логическая сумма двух выражений равна 0 когда каждое слагаемое равно 0
Значит ((x-10)(x+1)≤0)∧(x*x>A)≡0 и ((y*y≤A)∧((y-10)(y+1)>0)≡0
Логическое умножение равно 0 когда или оба множителя равны 0 или один из них
Рассмотрим первое выражение, первый его множитель не зависит от А, поэтому оно должно быть ложно. т.е. (x-10)(x+1)>0ю Учитывая условие задание, что х≥1, то x>10 и наименьшее целое из этого х=11
Тогда второй множитель x*x>A будет 11*11>A; A<121
Аналогично рассуждая для второго выражения с у, получу
(y-10)(y+1)≤0; y=[-1;10] , по условию y≥1, значит y=[1;10]
тогда y*y≤A; наибольшее y=10; 10^2≤A; A≥100
Учитывая полученные условия по А: A<121 и A≥100-выходит
A={100; 101;...120}-всего 21 целое значение