Предмет: Информатика,
автор: Илюха05122002
Пожалуйста HELP!SoS. Нужна программа по нахождению объёма куба в Pascal ABC
Ответы
Автор ответа:
0
var a,b: integer;
begin
write('введите три грани куба : ');
readln(a);
b:=a*a*a;
writeln('объём куба',b);
end.
begin
write('введите три грани куба : ');
readln(a);
b:=a*a*a;
writeln('объём куба',b);
end.
Похожие вопросы
Предмет: Биология,
автор: modihvh
Предмет: Русский язык,
автор: aqsinsafarov5
Предмет: Английский язык,
автор: mariasergeeva46
Предмет: Алгебра,
автор: sobachka2015