Ответы
Ответ дал:
0
===== PascalABC.NET =====
begin
var (y0, v0, g) := (1.0, 20.0, 9.81);
var y: real -> real := t -> y0 + v0 * t - g * t *t / 2;
foreach var t in Seq(1, 3, 4) do
Writeln(t, y(t):10:2)
end.
Приложения:
![](https://st.uroker.com/files/3ac/3ac15f0cd9de14902ed60311c5208423.jpg)
Вас заинтересует
4 месяца назад
4 месяца назад
5 месяцев назад
5 месяцев назад
2 года назад
7 лет назад