Határozat helytelen számú paramétert az eljárás - Turbo Pascal
Segíts kérlek! Ez nem működik. Nem értem semmit Pascal és kell tenni. Kétszer értékének kiszámításához a kifejezés, az első alkalommal használja az eljárást, és a második - a funkciót.
Nem értem, mi a baj itt! 42. sorban ennek ugyanazt a hibát! Code programban proga; const m = 8; n = 10; F = 15; típusú Raz = 1..f; mas = array [raz] valós; var x, y, z, w: mas; kx, ky, kz, kw: real; i: integer; függvény NMAS (a, y: mas; F: integer): integer; var i, j: integer; kezdődik j: = 0; i: = 1 f tenni, ha a [i]> 0, akkor kezdődik j: = j + 1; y [j]: = a [i]; végén; végén; kezdenek writeln ( 'Massiv X'); i: = 1-től m do kezdeni x [i]: = 4 * sqr (i) -9 * (5-i); writeln (x [i]); végén; writeln ( 'Massiv Y'); i: = 1-től m do kezdeni Y [i]: = 6 * sin (2 * i) + 5 * exp (i-5); writeln (y [i]); végén; writeln ( 'Massiv Z'); i: = 1-től n-do kezdeni Z [i]: = 6 * (i-4) + 5 * sqr (sin (1,5 * i)); writeln (Z [i]); végén; writeln ( 'Massiv W'); i: = 1 f do kezdeni w [i]: = 6 * ln (0,1 * i) + 10 * cos (i-2.5) * cos (i-2.5) * cos (i-2,5); writeln (w [i]); végén; ky: = NMAS (m, y); KZ: = NMAS (n, Z); kw: = NMAS (F, W); writeln ( 'Noviy Massiv Y', KY); writeln ( 'Noviy Massiv Z', KZ); writeln ( 'Noviy Massiv W', kW); végén.
Szia fórum felhasználók számára! hogy megoldja a problémát tettem az eljárást „sort” hiba, nem találják meg azt hiszem száma helyesen jelezte a tényleges. beállításokat, és hogy valahol jobb valahol kevesebb reményt a éles szem, segítsen nekem megtalálni a hibát?
A program nem működik, vagy nem felel meg a leírást. Kérjük, ossza meg velünk kitöltésével egy egyszerű űrlapot. Köszönöm =) Tedd oldal jobb