Skocz do zawartości

proszę o pomoc - program


Zbigniew20

Polecane posty

Miałem zadane 2 zadania 1 zrobilem tresc jego brzmiała

 

Napisz program w ktorym deklarujesz zmienna dynamiczna typu calkowitego. Nadajesz jej wartosc z klawiatury a nastepnie drukujesz ta wartosc na ekranie. Pamietaj o zwolnieniu pamieci. Nastepnie zmodyfikuj program tak aby w sposob dynamiczny wypełnic i wydrukować tablicę 5 liczb calkowitych

 

I ten program wygląda tak:

 

 
program zmienna;
Uses CRT;

type licz=^byte;
tab=array[1..5] of byte;
wsk=^tab;

var x:wsk;
i:byte;

BEGIN
clrscr;
NEW(x);
for i:=1 to 5 do begin;
write('Podaj',i,' liczbe ');
readln(x^[i]);
end;

for i:=1 to 5 do begin;
writeln(x^[i], ' ');
end;
DISPOSE(x);
readln;
end.

 

 

a ten co mam teraz zrobić to jakby odwrotność tego zadania co napisalem wyzej

 

w tym programie ma byc

x^:=np 5 i to oznacza -> w komore na ktora wskacuje wskaznik x wstaw liczbe 5

write(x^);

 

ale zabardzo nie wiem jak to zrobic

Link do komentarza
Udostępnij na innych stronach

Zarchiwizowany

Ten temat jest archiwizowany i nie można dodawać nowych odpowiedzi.

×
×
  • Utwórz nowe...