Трудовых поэтому денег не хватает
"В"скорее всего, так как тут говориться про природу!
Var g,t:integer;
s:real;
begin
g:=10;
writeln('Время падения в секундах равно ');
read(t);
while t<>0 do
begin
s:=(g*sqr(t))/2;
writeln('Высота колодца равна ',s,' метров.');
writeln('Время падения в секундах равно ');
read(t);
end;
end.<span>
</span>
1*2^1+0*2^0+12^-1+0*2^-2
6*8^1+4*8^0+5*8^-1