Дан двумерный массив А размером 3*3, заполненный с клавиатуры. Требуется умножить элементы этого массива на 4, если А(1,1)>0, или на 7, если A(1,1)<0

Dim a(1 to 3,1 to 3) as integer,i,j as integer
randomize
for i= 1 to 3
for j= 1 to 3
a(i,j)= rnd•100
print tab;a(i,j);
next j
print
next i
for i= 1 to 3
for j = 1 to 3
if a(1,1)>0 then
a(i,j)•4
end if
next j
next i
if a (1,1)<0 then
a(i,j)• 7
end if
next j
next i
print tab;a(i,j);
на языке бейсик))

Если ответ по предмету Информатика отсутствует или он оказался неправильным, то попробуй воспользоваться поиском других ответов во всей базе сайта.