... определить плавает ли тело с объемом 0,1 м³ погружённый в керосин если на него действует сила архимедова 100 Н

данное движение складывается из дух видов:

равномерное по горизонтали (по оси 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.