Камень падает в колодец. Известно время падения. Вычислить глубину колодца. Задание: В ТЕТРАДИ выполнить этапы программирования 1-3, после этого написать программу расчета глубины колодца (Ввод цифры ноль - конец работы програм...
Камень падает в колодец. Известно время падения. Вычислить глубину колодца.
Задание:
В ТЕТРАДИ выполнить этапы программирования 1-3, после этого
написать программу расчета глубины колодца (Ввод цифры ноль - конец работы программы) и протестировать ее.
Гость
Ответ(ы) на вопрос:
Гость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.
Не нашли ответ?
Похожие вопросы