Ответы на вопрос:
Procedure power(x: real; n: integer); var i: integer; p: real; begin p: =1; for i: =1 to n do p: =p*x; end;
Популярно: Информатика
-
Пятеро одноклассников: аня, саша, лена, вася и миша стали победителями...
dedchik07.04.2023 22:46 -
Найдите основание x системы исчисления если: 34x=22(в 10 системе...
nastea03030.12.2021 17:36 -
Дано масив з 30 елементів ,обрахуйте суму перших 15 елементів...
irinamiller9301.10.2022 10:48 -
Сколько килобайт составляет сообщение из 690 символов 16-символьного...
sleeplessness530.09.2020 08:30 -
Впоследовательности 3, 10,24,…, 73, 108,… пропущено число !...
Koshka156313.12.2022 05:07 -
Алфавит некоторого языка состоит из 64 символов. за сколько секунд...
lera19283746526.01.2022 10:08 -
При определении частного (x) и остатка (y) от деления числа 47...
Salazar0116.09.2020 02:53 -
Цвет точки на экране дисплея с 16-цветной палитрой формируется...
лиод130.10.2022 21:10 -
Як змінити розмір рядків і стовбців таблиці...
vladlena21727.06.2020 14:51 -
Сколько секунд потребуется модему, передающему сообщения со скоростью...
ngazaryan25.12.2020 08:58