Регистрация
mariyer
22.02.2023 22:08
Информатика
Есть ответ 👍

Определить значение выражения n^m+m^n/(n+m)^n+m ,используя подпрограмму для вычисления степени числа

178
292
Посмотреть ответы 2

Ответы на вопрос:

natali2101
natali2101
4,4(77 оценок)
Pascal как то так:   function p (a,b : integer) : integer;   //a^b var        i,r : integer;   begin    r : = 1;     for i : = 1 to b do    r : = r * a;     result : = r;   end;         var    n,m : integer;     r : real;   begin  n : = 2;   m : = 3;       r : = p(n,m)+p(m,n)/p(n+m,n)+m; writeln (r);   end.
PolyMoly1
PolyMoly1
4,5(74 оценок)
'microsoft qbasic cls for a = 1 to 9 for b = 0 to 9 for c = 0 to 9 for d = 1 to 9     n1 = 1000 * a + 100 * b + 10 * c + d     n2 = 10 * a + c     n3 = 10 * d + b     if n1 = n2 * n3 * 4 then           print a; b; c; d; " = "; a; c; " * "; d; b; " * 4"     end if next d next c next b next a результат выполнения программы:   1  9  7  2  =  1  7  *  2  9  * 4   5  4  7  2  =  5  7  *  2  4  * 4   8  6  3  2  =  8  3  *  2  6  * 4

Популярно: Информатика