запишите алгоритм ** языке ТР Алг.Вычислите площпди и объема вещ х,S,V Нач вывести...

Question

запишите алгоритм на языке ТР Алг.Вычислите площпди и объема вещ х,S,V Нач вывести "Введите длину ребра куба" Ввести х S:=6х(в квадрате) V:=х(в кубе) кон

Answer 1

var s,x,v:integer;

begin

s:=0; v:=0;

readln(x);

s:=6*sqr(x);

v:=x*x*x;

 

writeln(sqrt(s/6));

end.