1) Дана длина ребра куба
Найти объем этого куба и площадь боковой поверхности
2) даны 2 числа Найди сумму,разность произведения и частное
3) Вычислите значение функций z=x(вкубе)-2,5ху+1,78х(квадрат)-12,5у+1
(пожалуста очень срочно)
var a:real;
begin
readln(a);
writeln(V=,a*a*a);
writeln(S=,4*a*a);
end.
var x,y:integer;
begin
readln(x,y);
writeln(x+y, ,x-y, ,x*y, ,x/y);
end.
var x,y,z:real;
begin
readln(x,y);
z:=x*x*x-2.5*x*y+1.78*x*x-12.5*y+1;
writeln(z);
end.
Оцени ответ
