Рекурсивні означення та підпрограми

Тип документу: Реферат

Сторінок: 7

Предмет: Компьютерные науки

Автор: Олексій

Розмір: 17.1

Скачувань: 1316

if odd(n) then t:=t*x;

n:=n div 2;

if n>0 then x:=x*x else notfin:=false

end;

pow:=t

end;