Нужно написать программу в паскали авс. условие: нужно возвести число а в 20 степень. заранее !
201
482
Ответы на вопрос:
Есть функция power var a: integer; begin readln(a); writeln(power(a,20)); end.если нужно без ее , то цикломvar i,a,r: integer; beginr: =1; readln(a); for i: =1 to 20 dor*=a; writeln(r); end.
Популярно: Информатика
-
ArtemDem18.01.2021 17:33
-
elyasfel08.01.2020 08:03
-
shahriyorchikozb8ts20.10.2021 23:19
-
abdirovadajana26.06.2021 13:59
-
sofyashevtsova22.08.2022 08:47
-
ivankal10.11.2021 12:56
-
23452345torer10.09.2020 17:58
-
гость16212.07.2022 07:36
-
Lisa551105.12.2022 10:09
-
Пава130531.03.2020 08:13