решить задачки по с++,сама пыталась, но безуспешно.
1) Составить программу для вычисления суммы факториалов всех печатных чисел .Построить блок схему
2.)Составить программу для нахождения наибольшего общего деятеля четырёх натуральных чисел Построить блок схему.
3.)Заменить отрицательные элементы линейного массива их модулями ,не пользуясь стандартной функцией вычисления модуля. Подсчитать количество произведённых замен.
Построить блок схему.

Так как первые два байта слева в IP-адресе узла и адресе сети совпадают, значит, в маске для получения такого результата при поразрядной конъюнкции в двоичной системе должны быть все единицы. В маске 16 единиц есть

Разложение третьих чисел в адресах

номер 7 6 5 4 3 2 1 0

59(10)=0 0 1  1  1 0 1  1

65(10)=0 0 1 0 0 0 0 1

как видно полное совпадение видно в первых трех разрядах слева, значит 16+3=19 единиц в маске уже есть, но возможны еще...

Если биты пронумеровать справа налево

Для 4-го и 3-го бита получаем: ? & 0 = 0 -> в маске может находиться как единица, так и 0. Но так как по заданию у нас спрашивается наибольшее возможное количество единиц, то значит, необходимо сказать, что в маске данный бит равен 1.

Для 2-го бита получаем: ? & 1 = 0 -> в маске может находиться только 0.

Поэтому выходит что максимальное значение единиц в маске 19+2=21

1)
просто выводим элементы наооборот
program gt;
var a:array[1..6]of longint;
n,i:integer;
begin
read(n);
for i:=1 to n do
begin
read(a[i]);
end;
for i:=6 downto 1 do
begin
write(a[i],' ');
end;
end.
2)
добавляем дополнительный массив b
program gt;
var a,b:array[1..6]of longint;
n,k,i:integer;
begin
read(n);
k:=7;
for i:=1 to n do
begin
read(a[i]);
k:=k-1;
b[k]:=a[i];
end;
for i:=1 to 6 do
begin
write(b[i],' ');
end;
end.
3)
Изменяем элементы массива без дополнительных элементов
Program z10;
VAR 
p, i: Integer; 
x: Array [1..6] of integer;
Begin
For i:=1 to 3 Do 
begin
p:=a[i];
a[i]:=a[6-i+1];
a[6-i+1]:=p;
end;
for i:=1 to 6 do
begin
write(a[i],' ');
end;
end.