<span>99=10011001 в двоичной системе. класс сети B.
99.37.0.0 - адрес сети
0.0.125.186 - адрес компьютера в сети</span>
Математическая модель - это фактически просто формула.
Var a,k:integer;
begin
a:=-1;
k:=-1;
while a<>0 do begin
read(a);
if a mod 7 = 0 then k+=1;
end;
writeln(k);
<span>end.</span>
program prim;
var a,b:real;
begin
writeln('Введите 2 числа: ');
read(a,b);
if a>b then writeln('Большее число = ', a)
else writeln('Большее число = ', b);
end.
( На самом деле это очень легко) )