Задать вопрос
2 декабря, 06:50

Помогите прошу!

Составить алгоритм, блок схему и программу к задаче

Вычислить меньшее из 2 введённых чисел и возвести его в степень большего.

+1
Ответы (1)
  1. 2 декабря, 08:01
    0
    Var a, b, c, d:integer;

    begin

    writeln ('введите первое число');

    readln (a);

    writeln ('введите второе число');

    readln (b);

    c:=a;

    d:=b;

    if a
    while b1 do

    begin

    a:=c*a;

    b:=b-1;

    writeln (a);

    end

    else

    while a1 do

    beginb:=d*b;

    a:=a-1;

    writeln (b);

    end;

    end.

    1. запрашиваем первое число

    2. получаем первое число

    3. запрашиваем второе число

    4. получаем второе число

    5. приравниваем первое число некоторой переменной.

    6. приравниваем второе число некоторой переменной.

    7. если первое число больше второго то вычитаем из второго числа 1 и при каждом вычитании приравниваем первое число к произведению первого числа на переменную к которой его приравняли.

    выводим результат на экран.

    8. если второе число больше первого то вычитаем из первого числа 1 и при каждом вычитании приравниваем второе число к произведению второго числа на переменную к которой его приравняли.

    выводим результат на экран.
Знаешь ответ?
Не уверен в ответе?
Найди верный ответ на вопрос ✅ «Помогите прошу! Составить алгоритм, блок схему и программу к задаче Вычислить меньшее из 2 введённых чисел и возвести его в степень ...» по предмету 📙 Информатика, а если ответа нет или никто не дал верного ответа, то воспользуйся поиском и попробуй найти ответ среди похожих вопросов.
Искать другие ответы