Составть пожалуйста 2 программы для Паскаля,очень прошу, завтра информатика и я ничего не знаю!!!

Спасибо тебе огромное)

var b,z,x,y:real;beginwrite('Введите значение x: ');readln(x);write('Введите значение y: ');readln(y);write('Введите значение z: ');readln(z);b:=sqr(x)*((y*y*y)-2)+sqrt(3+z)/8;writeln('b = ',b);end.

Для второго

Спасибо еще раз)

Не за что

var a,z,x,y:real;beginwrite('Введите значение z: ');readln(z);write('Введите значение x: ');readln(x);write('Введите значение y: ');readln(y);a:=(44*z+x)/(y*y*y)-5;writeln('a = ',a);end.