Var S:real;
A,N,i:integer;
Begin
Write('N = ');Read(N);
S:=0;
i:=1;
Repeat
Read(A);
if (A mod 3 = 0)and(A mod 10 = 4) then S:=S+A;
i:=i+1
Until i > N;
WriteLn('S = ',S);
End.
Пример работы программы:
N = 5
1 24 74 54 36
S = 78
Ответ:
2 3
Объяснение:
Определение: Конъюнктивная нормальная форма, КНФ — нормальная форма, в которой булева функция имеет вид конъюнкции нескольких простых дизъюнктов.
После выполнения у будет равен 17
В моем учебнике <span>по математике 1024 мб информации.</span>