На бейсике даны массивы a(m) и b(m), m< =12 сформулировать массив с по правилу: c1=bm+a1 c2=bm-1+a2 cm=b1+am найти сумму s элементов массива с. вывести на печать массивы a, b, c и полученную сумму s..

dim a(12), b(12), c(12)

input "введите размерность массивов а и в - m= ", m 

print "введите элементы массивов а и в: "

for i=1 to m

  input a(i), b(i) 

next i

s=0

for i = 1 to m

  c(i)= a(i) + b(m-i+1)

  s= s+c(i)

next i 

print "массив а: " 

for i = 1 to m

    print a(i);

next   i 

print

print "массив b: " 

for i = 1 to m

    print b(i);

next   i 

print

print "массив c: " 

for i = 1 to m

    print c(i);

next   i 

print

print "сумма элементов массива с ="; s

 

 

D: /                                                                                     каталог11                           каталог2             мах

Const n=10; var a: array[1..n] of integer; i: integer;   begin randomize; for i: =1 to n do   begin   a[i]: =random(101)+1;   write(a[i]: 4);   end; writeln; for i: =1 to n do    begin   a[i]: =2*a[i];   write(a[i]: 4);   end; writeln; end.  пример:   49   50   73   47   69   29   42   37   44   19   98 100 146   94 138   58   84   74   88   38