Задать вопрос
4 декабря, 19:58

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

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

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

+2
Ответы (1)
  1. 4 декабря, 20:37
    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 введённых чисел и возвести его в степень ...» по предмету 📗 Информатика. Развернутая система поиска нашего сайта обязательно приведёт вас к нужной информации. Как вариант - оцените ответы на похожие вопросы. Но если вдруг и это не помогло - задавайте свой вопрос знающим оппонентам, которые быстро дадут на него ответ!
Искать готовые ответы