[pascal] Program Zamiana. Potrzebuje Poocy..

[bartool]

Otoz na wstepie napisze ze przygode z pascalem zaczelem dzisiaj okolo 9 rano ;)

o gotowce nie mozna prosic wiec prosze o pomoc z niektorych sprawach...

 

co musze zrobic:

 

Program „Zamiana”

Praca ma zawierać kod źródłowy oraz komentarze do programu, który:

a) wypełnia dwuwymiarową tablicę 5x5 losowymi liczbami całkowitymi z przedziału <0, 50>

b) wyświetla wypełnioną tablicę

c) szuka w tablicy liczby (np. zmienna k) podanej przez użytkownika

d) ponownie wyświetla tablicę z wyróżnionymi (np. na kolor) wszystkimi znalezionymi liczbami podanymi przez użytkownika (zmienna k)

e) zamienia każde wystąpienie podanej przez użytkownika liczby na przeciwną do niej.

f) wyświetla zmienioną tablicę

 

Program tablice;uses crt;varx: array [1..5,1..5] of integer;i,j,z: integer;procedure zapelnij;beginfor i:=1 to 5 dobeginfor j:=1 to 5 dobeginx[i,j]:=random(51);end;end;end;procedure pokaz;beginfor i:=1 to 5 dobeginfor j:=1 to 5 dobeginwrite (x[i,j], ' ');end;writeln;end;end;beginclrscr;randomize;zapelnij;pokaz;readln;write ('Podaj jakas liczbe z tebelki z= ');read (z);write ('podales liczbe: ',z);end.

no i wlasnie tutaj sie zawiesilem i nie wiem jak zrobic zeby wyszukalo w tablicy tej liczby i wyswietlilo tabele ze minionym klorem danej liczby...

chyba trzeba zastosowac if/then...

if z=??

 

z gory dzieki... w miare postepow bede uzupelnial temat bo mam jeszcze tydzien na napisanie tego programu..

[kobe2005]

nie pamiętam poleceń bo nie pisze w Pascalu ale mogę ci pomóc tak ogólnie

-żeby pokazało w kolorze to w procedurze wyświetlania wstawiasz instrukcje warunkowa if, która ma sprawdzić czy x[i,j]== zmienna k i jeśli tak to wyświetl ją w innym kolorze jeśli nie to wyświetl normalnie

-a zmienić liczbę na przeciwną to w zasadzie wystarczy dopisań przed nią znak - tutaj tez zrób podobnie jak z kolorem

 

(instrukcje tu to nie pascal tylko tak poglądowa żebyś ci wskazało właściwą drogę)

[Linoge]

No i zeby kolory dzialaly trzeba jeszcze uses crt wpisac czy jakos tak ;) niby ze jakas biblioteka graficzna ;)