isar |
Wysłany: Śro 12:14, 06 Lut 2008 Temat postu: Zerowanie Tablic: |
|
zadanie polega na wyzerowaniu tablicy(do kazdej komorki tablicy trzeba wpisac zero):
trzeba uzyc petli, jednej zmiennej do sterowania petla,
i jednej zmiennej tablicowej
a program bedzie wygladal tak:
program zerowanie ;
var a : integer ; {zmienna do sterowania tablica}
tab : array[1..10] of integer ; {zmienna tablicowa}
begin
for a:=1 to 10 do {petla, pomocna w zerowaniu }
{ tablicy}
tab[a]:=0; {do tablicy przypisuje 0, zmienna A w tym przypadku}
{steruje tablica}
end;
readln;
end. |
|