данное движение складывается из дух видов:
равномерное по горизонтали (по оси x) + равноускоренное по вертикали (по оси y)
v=18 м/с
будем считать, что сопротивление воздуха при таком движении равно нулю, а следовательно в каждой точке траектории полное ускорение тела равно ускорению свободного падения.
т.к. скорость величина векторная, то ускорение характеризующее изменение скорости по числовому значению (модулю) называется тангенциальным, ускорение, характеризующее изменение скорости по направлению называется нормальным.
program evg97; uses crt; var a,b,c: real; begin writeln('++'); writeln('| порівнялка |'); writeln('++'); write('введіть число a: '); readln(a); write('введите число b: '); readln(b); write('введіть число c: '); readln(c); writeln(); writeln('++'); writeln('| результат: |'); writeln('++'); if (a=b) or (a=c) or (b=c) then writeln('| деякі (або всі) числа рівні |') else if (a< b) and (b< c) then writeln('| число посередині: b=',b: 8: 3,' |') else if (a< c) and (c< b) then writeln('| число посередині: c=',c: 8: 3,' |') else writeln('| число посередині: a=',a: 8: 3,' |'); writeln('++'); end.