"В"скорее всего, так как тут говориться про природу!
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>
Из буффера обмена можно вставлять неограниченное количество раз одного фрагмента, пока он не будет замещён фрагментом другого текста
в буффер обмена можно поместить только один фрагмент текста, т.к. при помещении фрагмента текста в буффер обмена, предыдущий фрагмент, который хранился в буффере обмена, удаляется.
Здрасте Вика
давно не видились
ну можно для начала написать вобщем зачем может быть нужен комп,потом зачем он нужен на информатике именно тебе
ну и дальше самой придумать
Var a,b,s
begin
readln
end.