Нужна помощь в Практической работе! Turbo Pascal!

Question

1.Объявите переменные (идентификаторы пользователя), необходимые для вычисления значения функции y = x2. 
2.Объявите переменные, необходимые для пересчета веса из фунтов в килограммы 
3.Объявите переменные, необходимые для вычисления объема параллелепипеда 
Образец выполнения заданий; 
1 
x:real;[ аргумент функции] y:real; [значение функции] 
2 
funt: real; { вес в фунтах } 
kg:real; [вес в килограммах }

Eugene · Accepted Answer

Function x2(x: real):real; 
Function funt2kilo(funt: real):real; 
Function VPara(a,b,c: real): real;