Надо сделать программу через 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.