Żylak |
Wysłany: Pią 21:40, 07 Kwi 2006 Temat postu: |
|
Tablica
Kod: | type tablica=array[1..10] of integer;
var t:tablica; |
Zerowanie
Kod: | FOR a:=1 TO 10 DO
begin
t[a]:=0;
end; |
Podanie lementów
Kod: | FOR a:=1 TO 10 DO
begin
writeln('Podaj element ',a);
readln(t[a]);
end; |
Wypisanie
Kod: | FOR a:=1 TO 10 DO
begin
writeln('ELEMENT TABLICY NR ',a,': ',t[a]);
end; |
Pisane pod wpływam boskiego zióóóółka :DDDDD!!! |
|