Kezdőoldal » Számítástechnika » Programozás » Free Pascal! Kétdimenziós...

Mr.Lor kérdése:

Free Pascal! Kétdimenziós tömb index kiiratasa, hogyan?

Figyelt kérdés

Sziasztok! Nos a feladat a következő:

Töltsön fel egy 3x4es matrixot véletlen számokkal 1-99ig!

Majd írása ki a mátrix legkisebb es legnagyobb elemet az indexukkel egyutt(melyik sok melyik oszlop)


Irom meddig jutottam(csak telefonról kicsit nehéz):

program nyolcas;

uses crt;

var t:array[1..3,1..4] of integer;

i,j,min,max:integer;


begin

randomize;

clrscr;

for i:=1 to 3 do

begin

for j:=1 to 4 do

t[i,j]:=random(99)+1;

write(t[i,j]:4);

writeln;

end;


min:=t[1,1];

max:=t[1,1];

for i:=1 to 3 do

for j:=1 to 4 do

begin

if min>ti,j] then min:=t[i,j];

if max<t[i,j] then max:=t[i,j];

end;


writeln(‘A mátrix legkisebb eleme’,min);

writeln(‘A mátrix legnagyobb eleme’,max);


readln;

end.



2017. dec. 6. 15:49
 1/5 anonim ***** válasza:

Itt egy példa:

[link]

a lényeg: amikor megkeresed a minimumot/maximumot, megjegyzed a koordinátáját is.

2017. dec. 6. 16:31
Hasznos számodra ez a válasz?
 2/5 SimkoL ***** válasza:
65%
Picit javítva az előzőét: [link]
2017. dec. 6. 17:02
Hasznos számodra ez a válasz?
 3/5 A kérdező kommentje:
Köszönöm szépen, igazabol gondoltam hogy megkell jegyezni, csak nem tudtam hogy hogy! De köszönöm mindekettotoknek. Ment a zöld kéz! 
2017. dec. 6. 21:16
 4/5 tabaki ***** válasza:
Szabad a gazda: Miért kellett lepontozni SimkoL programját?
2017. dec. 6. 22:53
Hasznos számodra ez a válasz?
 5/5 tabaki ***** válasza:
2017. dec. 6. 23:33
Hasznos számodra ez a válasz?

Kapcsolódó kérdések:




Minden jog fenntartva © 2024, www.gyakorikerdesek.hu
GYIK | Szabályzat | Jogi nyilatkozat | Adatvédelem | Cookie beállítások | WebMinute Kft. | Facebook | Kapcsolat: info(kukac)gyakorikerdesek.hu

A weboldalon megjelenő anyagok nem minősülnek szerkesztői tartalomnak, előzetes ellenőrzésen nem esnek át, az üzemeltető véleményét nem tükrözik.
Ha kifogással szeretne élni valamely tartalommal kapcsolatban, kérjük jelezze e-mailes elérhetőségünkön!