Skocz do zawartości
Forum komputerowe PC Centre
entertp

[PASCAL] jak zrobić ten program

Rekomendowane odpowiedzi

Witam mam problem z programem w PASCALU. Mianowicie mam do napisania program który wyznacza element maxymalny i minimalny nad i pod przekątną tablicy 2-wymiarowej. Niestety nie mam pojęcia jak to zrobić nie mam już pomysłów na ten proramik :(. Mam nadzieję że mi pomożecie :). Z góry dziękuje Trophy250.

Udostępnij tę odpowiedź


Odnośnik do odpowiedzi
Udostępnij na innych stronach
Gość Clamoor
nie mam już pomysłów na ten proramik :(.

 

to moze pokaz co zrobiłes / jakie pomysły miałes. jakies dane wejsciowe wyjsciowe ?

Udostępnij tę odpowiedź


Odnośnik do odpowiedzi
Udostępnij na innych stronach

const
liczba=max;
var
tab:array[1..liczba,1..liczba] of integer;
j,l,n:integer;
begin
writeln('wielkość tablicy');
readln(n);
for l:=1 to n do
  for j:=1 to n do
    begin
writeln('podaj liczbe');
readln(tab[l,j]);
end;
// I TU JUZ SIE ZACIEŁEM JA ROBIŁEM TAK
writeln('wyswietlenie liczby z nad przekątnej');
  for l:=1 to n-1 do
begin
    for j:=l to n do
write(tab[l,j]);
writeln;
end;
//I JUŻ NIE WIEM JAK TALEJ ZROBIĆ

I nie wiem jak talej robic jak poruwnywac lizczby i jak wyświetlić liczby z pod przekątnej . pomożecie?

 

Udostępnij tę odpowiedź


Odnośnik do odpowiedzi
Udostępnij na innych stronach

1)

writeln('podaj liczbe'); tu warto dodać wspolrzedne liczby w tej macierzy tj.

writeln('podaj liczbe' l, ' ',j); no i jakoś to sformatowaćpo ludzku

 

2)

element max i min jak zawsze tj. masz zbiór danych, zaczynasz od uznania pierwszej za max (min) i potem przegladasz kolejne, gdy któraś jest mniejsza od min (wieksza od max) zastepujesz min (max) jej wartością i jedziesz dalej, po przeszukaniu całego zbioru masz w zmiennej max liczbe najwieksza a w min najmniejsza.

Problemem jest to że chodzi o elementy znad i spod diagonali (przekątnej).

Jeśli elementy na diagonali mają indeksy (i,i), to nad diagonalą masz (i,i+1) a pod (i,i-1), pojedyncza pętla starczy, zastanów się nad granicami licznika.

 

ps przyjąłem indeksowanie (kolumna, wiersz). Nie pamiętam jak jest w Pascalu.

 

PS.

-porÓwnywać

-spod

-dalej

 

Edytowane przez michasiek

Udostępnij tę odpowiedź


Odnośnik do odpowiedzi
Udostępnij na innych stronach

×
×
  • Dodaj nową pozycję...