1)
A = 7; B = 3
A mod B = 0 ⇒ 7 mod 3 = 0 ⇒ 1 = 0 ⇒ Нет
A = A*B = 7*3 = 21
Ответ: A = 21
2)
A = 12; B = 4
A mod B = 0 ⇒ 12 mod 4 = 0 ⇒ 0 = 0 ⇒ Да
A = A div B = 12 div 4 = 3
Ответ: A = 3
1.1)var n,i:integer;
begin
writeln('Введите число n');
readln(n);
for i:=1 to n do
begin
if (i mod 12=0) then write(i,' ');
end;
end.
1.2)var n,i:integer;
begin
writeln('Введите число n');
readln(n);
i:=1;
while (i<=n) do
begin
if (i mod 12=0) then write(i,' ');
i:=i+1;
end;
<span>end.
</span>1.3)var n,i:integer;
begin
writeln('Введите число n');
readln(n);
i:=1;
repeat
if (i mod 12=0)then write(i,' ');
i:=i+1;
until (i>n);
end.
2.1)var n,i,s:integer;
begin
s:=0;
writeln('Введите число n');
readln(n);
for i:=1 to n do
beginif (i mod 6=0)then s:=s+i;
end;
writeln('Сумма равняется ',s);
<span>end.
</span>2.2)var n,i,s:integer;
begin
s:=0;
writeln('Введите число n');
readln(n);
i:=1;
while (i<=n) do
begin
if (i mod 6=0) then s:=s+i;
i:=i+1;
end;
writeln('Сумма равняется ',s);
<span>end.
</span>2.3)var n,i,s:integer;
begin
s:=0;
writeln('Введите число n');
readln(n);
i:=1;
repeat
if (i mod 6=0) then s:=s+i;
i:=i+1;
until (i>n);
writeln('Сумма равняется ',s);
end.<span>
</span>
20) 192.168.1.25 - это как пример :) т.е. 32 бита в двоичной системе - 4 байта
25) я бы выбрал 1 и 4 - поисковые системы не хранят и не меняют весь объем информации, а обеспечивают обработку запросов, поиск информации и выдачу результатов