/
n-dimens
/
pascalabcnet
Обзор
Документация
Войти
/
n-dimens
/
pascalabcnet
Код
Запросы
0
Задачи
Вики
Пакеты
0
Релизы
0
Аналитика
Безопасность
master
InstallerSamples/!Tutorial/06_ForWhileRepeat/For5.pas
13 строк
347 B
miks1965
fix #1395
23 окт 2018, 22:06
23 окт 2018, 22:06
a2702ec
Код
Авторство
О чём код?
// Цикл for. Вычисление a в степени n begin var a := ReadlnReal('Введите a:'); var n := ReadlnInteger('Введите n:'); var p := 1.0; for var i:=1 to n do p *= a; Println($'{a} в степени {n} = {p}'); Println($'Стандартная операция {a} ** {n} = {a ** n}'); end.