Составить программы через Паскаль ABC1. Дана длина ребра куба а. Найти объем куба V = a3...

Question

Составить программы через Паскаль ABC
1. Дана длина ребра куба а. Найти объем куба V = a3 ( третья степень ) и площадь его поверхности S = 6 *a2. а = 2.00 V = 8.000 S = 24.000
2. Даны длины ребер a, b, c прямоугольного параллелепипеда. Найти его объем V = а*b*c
и площадь поверхности S = 2*( а*b + b*c + a*c ) a = 8.40 b = 3.80 c = 9.40 V = 300.048
S = 293.200
3. Найти длину окружности L и площадь круга S заданного радиуса R : L = 2*П (пи)*R, S = П (пи)*R2 (в квадрате) П = 3.14 R = 1.50 L = 9.420 S = 7.065

P.S *- умножение

Answer 1

Я так долго ждал тебя, мой юный Pascal программер.
1) var a, v, s:integer;
begin
readln(a);
v:=a*a*a;
s:=6*a*a;
writeln(v);
writeln(s);
end.
2) var a, b, c, v:real;
begin
a:=8.4;
b:=3.8;
c:=9.4
v:=a*b*c;
writeln(v);
s:=2*(a*b+b*c+a*c)
end.
3) var l, s, r, p: real;
begin
r:=1.5;
p:=3.14;
l:=2*p*r;
s:=p*r*r;
end.