Вкомпьютер вводятся два произвольных положительных числа a1 и a2 - длины сторон двух кубиков. требуется найти объём кубика, большего по размеру. составьте блок-схему и протокол. исходные данные a1=5 , a2=20

denis2016sham denis2016sham    1   13.06.2019 09:50    6

Ответы
viktoriasvoya viktoriasvoya  10.07.2020 13:27
Var a1,a2:integer;
begin
readln(a1);
readln(a2);
a1:=a1*a1*a1;
a2:=a2*a2*a2;
if a1>a2 then writeln(a1) else
writeln(a2);
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика