ответить Как найти элемент массива с определенным значением?
Выберите один из 3 вариантов ответа:
1) Отсортировать массив и выбрать максимальный индекс.
2) Перебирать элементы массива пока они не закончатся или пока не будет найден искомый.
3) Выбрать один элемент массива, предположить его искомым и сравнить с оставшимися, меняя в процессе предполагаемый искомый элемент.

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

uses crt; var a,b,c,min: integer; beginwriteln('введи три числа: '); readln(a,b,c); min: =a; if b< min then min: =b; if c< min then min: =c; writeln('наименьшее из этих чисел:   ',min); readln; end.

  друг  жить на любом этаже дома. поэтому, для решения используем уравнение 24=х. но 24=16. следовательно, х=16. в доме 16 этажей.

program pr; vars,n: string; c: char; i: integer; beginwriteln('введите имя и фамилию в одной строке'); readln (s); i: =1; while s[i]< > ' ' do i: =i+1; n: =copy(s,1,i-1); writeln(n); readln; end.