Дана длина ребра куба. Найти объём куба V и площадь его поверхности S. Написать программу по информатике
Ответы
Ответ дал:
0
program kub;
uses crt;
var
a, V, s: real;
begin
Write('Введите длину ребра: ');
readln(a);
V:=a*a*a;
S:=a*a;
Writeln('V=',V);
Writeln('S=',S);
readkey;
end.
uses crt;
var
a, V, s: real;
begin
Write('Введите длину ребра: ');
readln(a);
V:=a*a*a;
S:=a*a;
Writeln('V=',V);
Writeln('S=',S);
readkey;
end.
nataliyavab:
спасибо
Вас заинтересует
5 месяцев назад
5 месяцев назад
1 год назад
1 год назад
2 года назад
2 года назад
7 лет назад