4) а < 0
судя по этому должна быть ошибка в паскале...
Оно не будет повторяться,так как тут даже нету операторов для повтора.
Программа для создания презентаций (в основном)
Vb
dim matt() as integer
dim x,y as integer
x=5
y=5
redim matt(x,y)
randomize
for a as integer = 0 to x
for b as integer = 0 to y
matt(x,y)= (rnd()*88)+11
next
next
dim i,z as integer
do
matt(i,z)=0
i+=1
z+=1
loop until (i=x and z=y)