Напишу программу на Паскале, если нужна на другом языке, можешь удалять.
program ball ;
var
a, b:string ;
c, d, z: integer ;
begin write ( 'введите фамилию, имя и баллы по двум предметам' ) ; read ('a', 'b', c, d)
z:=c+d
if z<30
then writeln ('a', 'b')
1) программа дешифратор.
2) прога для 3D моделей. (3D Studio Max)
Хехе
1) 25*n*n+2*(-7)
2) (2-3*m)/(3+m)
3) -7+ abs(5-n)
4) 5*n - sqrt(2+3*m) - (1/2)
Var
x,y:real;
begin
x:=2.509;
y:=(exp(3*ln(abs(x-3)))-5*x)/(sqr(x+2)+exp(ln(x)/5))*exp(3*ln(x+sqr(x)));
Writeln(y)
end.
<em><u>Результат выполнения программы:</u></em>
-393.821568095705