7целтаб dat[1: 7] цел k, m dat[1]: =15; dat[2]: =18 dat[3]: =22; dat[4]: =20 dat[5]: =23; dat[6]: =24 dat[7]: =20 m: = 0 нц для k от 1 до 7 если dat[k] > 20 то m: =m+1 все кц
(QBasic) CLS DIM dat(7) dat(1) = 15 dat(2) = 18 dat(3) = 22 dat(4) = 20 dat(5) = 23 dat(6) = 24 dat(7) = 20 FOR k = 1 TO 7 IF dat(k) > 20 THEN m = m + 1 END IF NEXT
Все зависит от того, о каком языке идет речь. Если язык допускает только типизированные массивы, то тип элементов массива может быть любым, как базовым, так и определенным пользователем, но все элементы массива должны быть одного типа. Если в языке допускаются нетипизированные массивы, то любые элементы массива могут иметь любой, предопределенный в языке тип, либо ранее объявленный тип, либо быть бестиповыми. Другими словами, если в языке допускаются нетипизированные массивы, то тип каждого элемента может определяться, а также переопределяться в процессе выполнения программы.
Например, Паскаль - язык с жесткой типизацией. В нем тип массива определяет тип всех элементов этого массива. Сам тип может быть как предопределенным (числовым, логическим, булевым, строковым,...), так и определенным пользователем посредством конструкции Type.
Индекс массива - это порядковый номер элемента в массиве, поэтому он всегда целочисленный. В ряде языков можно указывать индексы вещественного и даже строкового типа, но в любом случае они будут приведены к целочисленным.
Для записи максимального числа необходимо в наибольшем разряде числа записать самую большую цифру,то есть 9,поскольку это палиндром,то и последняя цифра будет 9. 9+9=18,39-18=21-сумма оставшихся пяти цифр.(Если использовать в числе две цифры 7, то сумма оставшихся трех цифр составит 7,а из этих трех цифр две 4 не получится ,а одна не удовлетворяет условие,поскольку на две цифры останется сумма 3.)В этом числе может быть только одна 7,и число выглядит так 9**7**9,а сумма неизвестных четырех цифр-14. среди этих четырех цифр две 4,тогда сумма двух оставшихся цифр-6,то есть это две 3.Осталось только записать это максимальное число. 9437349.Проверим 9+4+3+7+3+4+9=39
CLS
DIM dat(7)
dat(1) = 15
dat(2) = 18
dat(3) = 22
dat(4) = 20
dat(5) = 23
dat(6) = 24
dat(7) = 20
FOR k = 1 TO 7
IF dat(k) > 20 THEN
m = m + 1
END IF
NEXT
m будет равно 3