Ответы
Ответ дал:
0
var
x, y, result:real;
begin
readln(x, y);
result := 1;
if y > 0 then
begin
while y <> 0 do
begin
result := result * x;
y := y - 1;
end;
end
else if y < 0 then
begin
while y <> 0 do
begin
result := result * x;
y := y + 1;
end;
result := 1 / result;
end
else result := 1;
writeln('x^y = ', result);
end.
Ответ дал:
0
2 Browze: по-моему она просто издевается. Но в любом варианте тут делать дальше нечего по-моему.
Ответ дал:
0
Не все умные в программирование знаете ли.я не над кем не издеваюсь.я просто не понимаю эту херню,я сильна немного в другом,и это не значит что я тупая
Ответ дал:
0
Понимаете, мы не можем сказать конкретно, что делать с кодом. Если Вам учитель сказал, чтобы написали его на листке, пишите на листке. Вам было дано решение в двух вариациях. Что вам еще нужно, скажите?
Ответ дал:
0
Эти решения не соответсвует тому чо мне нужно,ну да ладно я нашла другой источник информации и на том спасибо
Ответ дал:
0
Вы написали в условии "на паскале" - я вам написал. После вам потребовалось на паскале абц - вам предоставил решение Эникей. Теперь, оказывается, это все не соответствует тому, что вам нужно. Бред, правда. Указывайте тогда конкретнее все нюансы, которые нужно учитывать.
Похожие вопросы
2 года назад
2 года назад
8 лет назад
8 лет назад
9 лет назад
9 лет назад