Применим закон замены импликации
A -> B = -A V B
Следовательно преобразуем B будет под двойным отрицанием, двойное отрицание нам дает положительно высказывание.
Следовательно выражение будет иметь следующий вид:
A V B V C
Const n=15;
var a: array[1..n] of integer;
i:integer;
begin
for i:=1 to n do begin a[i]:=random(10); write(a[i], ' '); end;
writeln;
for i:=1 to n do if a[i]=4 then write('A[',i,']', ' ');
<span>end.</span>
Ответ:
program n1;
var time, seconds, minutes, hours: integear;
begin
readln(time);
seconds := time mod 60;
time := (time - seconds) / 60;
minutes := time mod 60;
time := (time - minutes) / 60;
hours := time;
writeln (hours, ' часов ', minutes, ' минут ', seconds, ' секунд');
end.
Объяснение:
Написано на языке Pascal
ну например 4A Motor Shield на основе MC33932
https://www.chipdip.by/product/4a-motor-shield