ДАЮ 30 БСоставить программку на языке Паскаль,возведения числа х в степень

ДАЮ 30 Б

Составить программку на языке Паскаль,возведения числа х в ступень числа y.

Задать свой вопрос
1 ответ

Хорошо, если вы не используете функции и не используете библиотеки(типа crt)

var i, y, x, xy:integer;

begin

write('x=');

readln(x);

write('y=');

readln(y);

xy:=x;

for i:=1 to (y-1) do

begin

xy:=xy*x;

end;

writeln(xy);

end.

Даниил Жигалов
и не надо репортить в некст раз, Конкретно ТЫ ПРОСИШЬ Поддержки, а не я
Диман Коровицын
Где написано, что х и у - только целые? Что будет при отрицательном у ?
Voshhinskij Maksim
Не программка - а так, шутка.
, оставишь ответ?
Имя:*
E-Mail:


Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт