Информатика, опубликовано 2018-08-22 19:14:08 by Гость
Помогите пожалуйста!!!Нужно написать программу в паскали АВС.Условие: нужно возвести число А в 20 степень.Заранее спасибо!
Ответ оставил Гость
Есть функция power
var a:integer;
begin
readln(a);
writeln(power(a,20));
end.
если нужно без ее помощи, то циклом
var i,a,r:integer;
begin
r:=1;
readln(a);
for i:=1 to 20 do
r*=a;
writeln(r);
end.
Не нашли ответа?
Если вы не нашли ответа на свой вопрос, или сомневаетесь в его правильности, то можете воспользоваться формой ниже и уточнить решение. Или воспользуйтесь формой поиска и найдите похожие ответы по предмету Информатика.