<span>var
i, k: real;
num:array[1..100] of integer;
begin
for: i := 1 to 99 do
num[i] := i;
k := 0;
i := 1;
while k < 7 do
begin
if easy(num[i])
then
k := k + 1;
i := i + 2;
end;
write(num[i-2]);
end.
Немного разобрал бред, но программа бессмысленная и проверка(if </span>easy(num[i])) мне не понятна, что это за процедура easy?
Что за массив без его описания, автор разберись с кодом, поучи синтаксис Паскаля.
Истина всегда является цифрой 1, ложь обозначается цифрой 0.
Логическая операция <<и>> является умножением. Грубо говоря, при операции 1 и 0= 0(т.к. 1 при умножении на 0 даст нам 0). Также её могут записать как: 1&0=0;
Сложный пример: 1&1&1&1&1&1&0=0, т. к. присутствует ноль.
Логическая операция <<или>> - чутка измененный оператор сложения, если хоть одно число = 1, то и все выражение будет = 1. К примеру 0 или 1 = 1, также может быть записано как: 1+0=1;
Сложный пример: 0+0+0+0+1+0+0=1, т. к. присутствует хоть 1 единичка.
Инверсия - полная противоположность чего-либо, в нашем случае:
Было 1, стало 0; Было 0, стало 1. Утверждение считалось правдивым, с инверсией она станет ложным.
Сложный пример: (Не (Не 1)) =1.(сначало наше значение принимает значение нуля, затем снова единицы)
Контрольный пример:
1&(Не0+0) =1×(1+0) =1×1=1, соответственно все выражение является истинным.
Дана последовательность целых чисел 0,9,1,8,2,7,3,6,4,5,90,...следующее числа-двухзначное.укажите его
Kochcurov
18, 27, 36, 45 - сумма двух чисел была 9, у двузначных тоже. Может такая логика?
Введя данный код в турбо Паскаль был дан ответ: 51