Proszę o pomoc. Mam za zadanie napisać program, w Pascalu, który liczy potęgę, a dokładnie Liczbę do potęgi 3. Napisałam program w C++ i chcę go przekształcić na Pascal. Nigdy nie miałam Pascala. Nawet nie mieliśmy podstaw. Częściowo udało mi się przekształcić kod, ale resztę nie mam zielonego pojęcia jak zrobić. Szukałam 2 dni i nie znalazłam. Jest to na zaliczenie przedmiotu nie związanego z nauką programowania.
C++
#include<stdio.h>
#include<iostream>
using namespace std; //przestrzen nazw std
//funkcja obliczajaca potęge W liczby A
int potega(int P,int W)
{
if (W==0)return 1;
else
return P=P*potega(P,--W);
}
//funkcja główna
int main()
{
cout << "23 ^ 3 = " ;
cout << potega(23,3);
return 0;
}
Pascal
program potega;
var
potega(P: integer,W: integer);
begin
(W==0)
P=P*potega(P,--W);
end
begin
wartosc := potega(23,3);
write("Trzecią potęgą liczby 2 jest : ");
writeln(wartosc);
end.