<em>// PascalABC.NET 3.2, сборка 1417 от 28.03.2017</em>
<em>// Внимание! Если программа не работает, обновите версию!</em>
begin
var a:=ArrRandom(50,-50,50); a.Println;
Writeln('k=',a.Where(x->x.IsEven and (x mod 3<>0)).Count)
end.
<u>Пример</u>
46 39 16 14 -16 -35 -34 -38 5 16 -13 -19 48 18 -33 -37 3 -41 46 38 15 21 50 50 21 -29 -34 4 -31 -18 31 -2 26 45 -8 1 13 29 -35 -46 25 -38 -13 23 14 -17 -30 35 9 -34
k=20
Var
A,B,C:char;
Begin
WriteLn('Введи первый символ');
ReadLn(C);
WriteLn('Введи второй символ');
ReadLn(A);
WriteLn('Введи третий символ');
ReadLn(B);
if (Ord(A)*Ord(B)) mod Ord(C) = 0 then WriteLn('Верно')
else WriteLn('Не верно')
End.
Это самый малый элемент пиксель
Все три разряда заполнены числами, на единицу меньшими основания системы счисления. Следовательно, очередная +1 сбросит эти разряды в ноль и пошлет +1 в следующий, четвертый разряд. Поэтому в системе счисления с любым натуральным основанием будет получен ответ 1000.
Умозаключение - это вывод, основанный на рассуждении
как я помню, то таблица истинности, это та таблица, показывающаю верное и неверное умозаключение, есть несколько видов этих таблиц:
1)Конъюнкция
2)Дизъюнкция
3)Импликация
4)Эквиваленция
и так далее, это если по учебнику 9 класса
в интернете введи эти таблицы и зайди на вики педию, там есть эти таблицы, посмотри