Дана длина рёбра а. Найти оъём куба V=a3 и площадь его поверхности s=6*a2

Question

Дана длина рёбра а. Найти оъём куба V=a3 и площадь его поверхности s=6*a2

Comments

нужен код программы?\

---

program by_Kostya;vara,s,v:integer;beginwriteln('Введите сторону куба');readln(a);s:=6*a*a;v:=a*a*a;writeln('Объем равен ', v);writeln( 'Площадь', s);readln;end.

---

program kub;vara,s,v:integer;beginwriteln('Введите сторону куба');readln(a);s:=6*a*a;v:=a*a*a;writeln('Объем равен ', v);writeln( 'Площадь', s);readln;end.

---

это код программы

Answer 1

Program kub;vara,s,v:integer;beginwriteln('Введите сторону куба');readln(a);s:=6*a*a;v:=a*a*a;writeln('Объем равен ', v);writeln( 'Площадь', s);readln;end.