Program z1;
var a,b,c,s,p:real;
begin
writeln('введите три стороны треугольника');
readln(a,b,c);
p:=(a+b+c)/2;
s:=sqrt(p*(p-a)*(p-c)*(p-b));
writeln(s);
end.
1100101(2) = 2^6+2^5+2^2+1=64+32+4+1=101(10)/
Var a,b,s:real;
begin
write ('Введите длину: ');
readln (a);
write ('Введите ширину: ');
readln (b);
s:=a*b;
writeln ('Площадь = ',s);
end.
Рассуждение такое. 9 мегабайт - 240 секунд, а 80 секунд - это в 3 раза меньшее время, значит передастся в 3 раза меньший объем. 9/3 = 3 Мегабайта.
В ответ просто впиши цифру 3