Надо сделать программу через PascalABC.
Найти данные по формуле V=sqrt2aS+V0^2.
sqrt-Квадратный корень.

Program z2;  Var  v,s,a,v0:real;Begin  Write('Vo ='); readln(v0);  Write('a ='); readln(a);  Write('S ='); readln(s);  v:=sqrt(2*a*s+v0*v0);  Write('V =',v);End.