составить программку,которая строит в ступень дробь
Составить программку,которая строит в ступень дробь
Задать свой вопрос
Леха Фриш
А что за проблема? Раздельно возводим в ступень числитель и знаменатель
1 ответ
Генка Парбузин
// PascalABC.NET 3.0, сборка 1150 от 22.01.2016
begin
var a,b,sgn:integer;
var aa,bb,ap,bp:BigInteger;
var s:string:='';
Write('Введите числитель и знаменатель дроби: ');
Read(a,b);
var n:=ReadInteger('Ввведите показатель ступени:');
if n=0 then WritelnFormat('(0/1)^0 = 1',a,b)
else
if (a=0) and (blt;gt;0) then WritelnFormat('(0/0)^1 = 0',b,n)
else begin
if a*blt;0 then s:='-';
aa:=абс(a); bb:=абс(b); ap:=1; bp:=1;
if ngt;0 then
for var i:=1 to n do begin ap*=aa; bp*=bb end
else
for var i:=1 to -n do begin ap*=bb; bp*=aa end;
if bp=1 then
WritelnFormat('(0/1)^2 = 34',a,b,n,s,ap)
else
WritelnFormat('(0/1)^2 = 34/5',a,b,n,s,ap,bp)
end
end.
Тестовые образцы:
Введите числитель и знаменатель дроби: 1 23
Ввведите показатель ступени: 5
(1/23)^5 = 1/6436343
Введите числитель и знаменатель дроби: 1 6
Ввведите показатель ступени: -4
(1/6)^-4 = 1296
Введите числитель и знаменатель дроби: -3 31
Ввведите показатель степени: 11
(-3/31)^11 = -177147/25408476896404831
Введите числитель и знаменатель дроби: -17 -125
Ввведите показатель ступени: 4
(-17/-125)^4 = 83521/244140625
Введите числитель и знаменатель дроби: -15 27
Ввведите показатель ступени: 0
(-15/27)^0 = 1
Введите числитель и знаменатель дроби: 0 3
Ввведите показатель ступени: 2
(0/3)^2 = 0
Введите числитель и знаменатель дроби: 2 0
Ввведите показатель степени: 3
(2/0)^3 = 8/0
Введите числитель и знаменатель дроби: 0 0
Ввведите показатель ступени: 3
(0/0)^3 = 0/0
begin
var a,b,sgn:integer;
var aa,bb,ap,bp:BigInteger;
var s:string:='';
Write('Введите числитель и знаменатель дроби: ');
Read(a,b);
var n:=ReadInteger('Ввведите показатель ступени:');
if n=0 then WritelnFormat('(0/1)^0 = 1',a,b)
else
if (a=0) and (blt;gt;0) then WritelnFormat('(0/0)^1 = 0',b,n)
else begin
if a*blt;0 then s:='-';
aa:=абс(a); bb:=абс(b); ap:=1; bp:=1;
if ngt;0 then
for var i:=1 to n do begin ap*=aa; bp*=bb end
else
for var i:=1 to -n do begin ap*=bb; bp*=aa end;
if bp=1 then
WritelnFormat('(0/1)^2 = 34',a,b,n,s,ap)
else
WritelnFormat('(0/1)^2 = 34/5',a,b,n,s,ap,bp)
end
end.
Тестовые образцы:
Введите числитель и знаменатель дроби: 1 23
Ввведите показатель ступени: 5
(1/23)^5 = 1/6436343
Введите числитель и знаменатель дроби: 1 6
Ввведите показатель ступени: -4
(1/6)^-4 = 1296
Введите числитель и знаменатель дроби: -3 31
Ввведите показатель степени: 11
(-3/31)^11 = -177147/25408476896404831
Введите числитель и знаменатель дроби: -17 -125
Ввведите показатель ступени: 4
(-17/-125)^4 = 83521/244140625
Введите числитель и знаменатель дроби: -15 27
Ввведите показатель ступени: 0
(-15/27)^0 = 1
Введите числитель и знаменатель дроби: 0 3
Ввведите показатель ступени: 2
(0/3)^2 = 0
Введите числитель и знаменатель дроби: 2 0
Ввведите показатель степени: 3
(2/0)^3 = 8/0
Введите числитель и знаменатель дроби: 0 0
Ввведите показатель ступени: 3
(0/0)^3 = 0/0
, оставишь ответ?
Похожие вопросы
-
Вопросы ответы
Новое
NEW
Статьи
Информатика
Статьи
Последние вопросы
Рассматривая литературный язык как сложное взаимодействие книжного языка и разговорного,В.И.Чернышёв горячо
Разные вопросы.
Арабы входят в __________________ групп народов. Местом расселения арабов с незапамятных
Разные вопросы.
Грузовой автомобиль марки краз за одну поездку может доставить 7.500 кирпичей
Математика.
Определить предложения какие они по цели высказывания и по интонации
Русский язык.
"Три толстяка" Называли эту площадь Площадью Звезды последующей причине.
Русский язык.
на одной грядке коротышки посадили 3 ряда морковок по 8 штук
Разные вопросы.
эссе на тему какое образование дается в каждой семье
Қазақ тiлi.
Put the verb in brackets into the Present Indefinite.
1The Volga ,
Английский язык.
Сколько стоит коктейль молочный? Точную цену надо?
Математика.
Составить рассказ Из чего складывался культ монарха помазанника Божьего?
История.
Облако тегов