<h3>PascalABC.NET 3.4.2, сборка 1861 от 09.11.2018</h3><h3>Внимание! Если программа не работает, обновите версию!</h3>
begin
var s:=ReadLines('data.txt').First.Select(t->t.ToDigit)
.Aggregate(BigInteger(1),(a,b)->a*b).Println
end.
<h2>Пример</h2>
10057531504895395788703629698793031096713606951075840000000000000
<h3>Файл data.txt дан во вложении</h3>
Const n=
var a:array [1..n] of integer; (целый)
i,k, i_max: byte; max, sum:integer;
begin
randomize; или for i:=1 to n do
for i:=1 to n do readln(a[i]);
a[i]:=random (100);
k:=0
for i:=1 to n do
if a[i]<0 then k:=k+1];
max:=0; i_max:=0;
for i:=1 to n do
if a[i]>max then begin max:=a[i]; i_max:=i; end;
sum:=0;
for i:=i_max to n do
sum:=sum+a[i];
writeln('Количество отрицательных элементов ',k);
writeln('Сумма элементов ', sum);
readln;
end.
Ответ:
Конъюнкция
Объяснение
Конъюнкция - это сложное логическое выражение, которое считается истинным в том и только том случае, когда оба простых выражения являются истинными, во всех остальных случаях данное сложенное выражение ложно. Логическое "и" (умножение).
Обозначается символами &, ^, * и др.
Польза
Благодаря силе трения,
мы можем нормально ходить,
мы можем спокойно стоять на земле или другой поверхности,
древние люди добывали огонь,
ну можно еще много сюда привести,
Вред
Например сила трения приводит к износу деталей автомобиля: подшипников, шин,
из-за нее делаются болезненными некоторые, действия человека, пример: если пальцы рук будут тереться об ручку лопаты во время какой-либо работы, то возникнут мозоли как защитная реакция организма
16 символов - 4 бита.
4*74 = 296 битов.
296/8=37 байт