Заданы два числа В и С.Если разность этих чисел четное число, а частное от деления этих чисел кратно 3, тогда Распечатать сумму кубов этих чисел, Иначе разность квадратов большего и меньшего чисел Помогите пожалуйста решить нужна блок-схема, (язык Паскаль) ❤️
Answers & Comments
var b,c:integer;
BEGIN
readln(b,c);
if (c>b) then swap(b,c);
if ((b-c) mod 2=0) and (b mod c=3) then
writeln(c*c*c+b*b*b) else
writeln(abs(sqr(b)-sqr(c)));
end.