profile
Опубликовано 5 лет назад по предмету Информатика от aravaika04

Заданы два числа В и С.Если разность этих чисел четное число, а частное от деления этих чисел кратно 3, тогда Распечатать сумму кубов этих чисел, Иначе разность квадратов большего и меньшего чисел Помогите пожалуйста решить нужна блок-схема, (язык Паскаль) ❤️

  1. Ответ
    Ответ дан supersuperkirip54irs

    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.

Самые новые вопросы