Написать программу на языке Pascal; Даны действительное х и натуральное п. Вычислить Y:
Написать программу на языке Pascal; Даны действительное х и натуральное п. Вычислить Y:
Не можешь разобраться в этой теме?
Обратись за помощью к экспертам
Гарантированные бесплатные доработки в течение 1 года
Быстрое выполнение от 2 часов
Проверка работы на плагиат
Поможем написать учебную работу
var
x, y: real;
p, i: integer;
begin
writeln('Введите значение x:');
readln(x);
writeln('Введите значение p:');
readln(p);
y := 1;
for i := 1 to p do
begin
y := y * x;
end;
writeln('Значение Y = ', y:0:2);
end.