Опубликовано 13.06.2017 по предмету Информатика от Гость >> <<

ВЫЧИСЛИТЬ ПОЛОЩАДЬ ПОВЕРХНОСТИ КУБА И ЕГО ОБЪЕМ,если ребро( h)) ВВОДИТСЯ С КЛАВИАТУРЫ.ВЫЧИСЛИТЬ, заполнить таблицу (начальные значения задать самостоятельно) H(cм) Sкуба(см) Vкуба(см)
Срочно помогите

Ответ оставил Гость

Var h,s,v:integer;
begin
write(h=);readln(h);
s:=6*h*h;
v:=h*h*h;
writeln( h   s    v);
writeln(h:2,s:5,v:5);
end.

Пример:
h=5
 h   s    v
 5  150  125