mrdimants Ierakstīts Marts 4, 2013 Share Ierakstīts Marts 4, 2013 Esmu nedaudz neizpratnee, kaa pilda so doto uzdevumu, ceru uz sapratni 1. Masīva A(N,M) elementiem ( kur N un M ievada no tastatūras), vērtības piešķir ar RANDOM funkciju. Masīva vērtību apgabals norādīts konkrētā uzdevumā. 2. Uz ekrāna izvada: matricu A(N,M): katram variantam aprēķināto rezultātu. 3. Uzdevums - Dotas matricas elementi ir naturali skatli robezas(10,20). Noteikt cik matrica ir vienadi blakus elementu pari matricas kolonnas. Izvadit to skaitu un katra atrasta para elementa vertibu un atrasanas vietu. 4. Pievērsiet uzmanību, kā M, N var būt vērtība >par3 5. Ja matrica uzdevumā kvadrātiskā tad M=N. 6. Programmā iegūto rezultātu saglabāt teksta failā 7. Programmā pierakstīt komentārus 8. Uzdevuma risinājumam, uzzīmēt programmas blokshēmu. Paslaik ir tik talu, talak neizprotu, kas talak jaizdara... program a11uzd; uses crt; var n,m,k,f:integer; A: Array [1..10, 1..20] of integer; begin clrscr; writeln('Ievadi n un m: '); readln(n,m); for k:=1 to m do for f:=1 to n do A[k,f]:=random(10)+10; for k:=1 to m do begin for f:= 1 to n do write(A[k,f]:4); writeln(); writeln(); end; readkey; end. Link to comment Share on other sites More sharing options...
zeratuls Marts 4, 2013 Share Marts 4, 2013 RTU butu laiks noslaktet ka jaunos pratus ar PASCAl bende nost. Link to comment Share on other sites More sharing options...
martinno Marts 4, 2013 Share Marts 4, 2013 Es esmu ļoti saprotošs... Link to comment Share on other sites More sharing options...
Recommended Posts