Fil pisze:
> Witam!
>
> Są dwie procedury:
> CPP:
> void MulTab(int N, int Q, int M, double** A, double** B, double** C)
> {
> for (int i = 0; i < N; ++i)
> for (int j = 0; j < M; ++j) {
> C[i][j] = 0;
> for (int k = 0; k < Q; ++k) C[i][j] += A[i][k] * B[k][j];
> }
> }
>
> oraz PASCAL:
> TMatrix = array of array of double;
>
> procedure MulMatrix(N, Q, M:integer; T1, T2:TMatrix; var T3:TMatrix);
> var
> i, j, k:integer;
> begin
> for i := 0 to N-1 do
> for j := 0 to M-1 do begin
> T3[i, j] := 0;
> for k := 0 to Q-1 do T3[i, j] := T3[i, j] + T1[i, k] * T2[k, j];
> end;
> end;
>
> Kompiluję obie w BCB Builder 2010 i Delphi 2010 (odpowiednio) w trybie
> "release" z włączonymi optymalizacjami i odpalam.
> Dla rozmiarów N = 2000 i M = 300 mam takie czasy:
> CPP time = 4,5s
> PAS time = 8,2s
>
> Czasy mierzone z wykorzystaniem QueryPerformanceCounter... i wiem, że
> procedurke w PASCALu można lepiej napisać, ale nie jestem fanem PASCALa
> i nie sądzę, aby ten niezbyt ładnie napisany kod usprawiedliwiał TAKĄ
> różnicę w czasach. Chyba, że problem tkwi w tablicach dynamicznych PASCALA?
>
> Czy to oznacza, że Delphi nie nadaje się do obliczeń?

Zapewne się nadaje, ogólnie jednak kompilatory Borlanda słabo
optymalizują - niezależnie od języka. Więc zależy od tego co chcemy
obliczać.


--
Kaczus
http://kaczus.republika.pl