Если маска будет такая:
255.255.255.192 то адресов будет 64
Такая маска:
255.255.255.128 - 128 адресов. Значит нам подойдет этот вариант и в нем 25 единиц.
S:=2*r+d;
:= означает присвоить
2r в математике значит 2умножить на r ( в паскале умножить пишется знаком * )
дальше всё ясно
Var a,b,h:integer;
begin
read(a;h);
write(a^a+2*a*sqrt(a^a/4+h*h));
wrteln((h*a*a)/3);
end.