Программист написал программу, вычисляющую сумму элементов массива A, десятичная запись которых заканчивается на 5…

Представленный ниже на пяти языках программирования фрагмент программы обрабатывает элементы одномерного целочисленного массива A с индексами от 0 до 9. Перед началом выполнения данного фрагмента эти элементы массива имели значения 2, 4, 1, 8, 2, 6, 3, 2, 2, 1 (т.е. A[0] = 2, A[1] = 4, …, A[9] = 1). Определите значение переменной s после выполнения фрагмента.

Паскаль

n:=10;

s:=0;

for i:=1 to n-1 do begin

if a[i-1]>2*a[i] then begin

a[i]:=2*a[i];

s := s+ a[i];

end;

end;

Составить программу, которая вводит с клавиатуры значения элементов массива a[1.n] состоящего из n целых чисел и вычисляет среднее арифметическое элементов массива. Число n ввести с клавиатуры.

Напишите программу. Заполните массив А из 20 элементов по формуле А[i] = i^2 и распечатайте в столбец все его элементы в виде: <имя элемента> = <значение элемента> . По результатам выполнения программы заполните таблицу:

А(1) =

А(2) =

А(3) =

А(4) =

А(5) =

и т.д.

Представленный ниже на четырех языках программирования фрагмент программы обрабатывает элементы одномерного целочисленного массива A с индексами от 0 до 9. Перед началом выполнения данного фрагмента эти элементы массива имели значения 3, 5, 8, 2, 1, 4, 3, 1, 2, 3 (т. е. A[0] = 3, A[1] = 5, ., A[9] = 3). Определите значение переменной s после выполнения фрагмента.

Программист написал программу суммирования элементов массива, но допустил в ней ошибку.

1) Что получится в результате выполнения этой программы, если в качестве элементов массива ввести числа: 1, -2, 3, -4, 5, -6, 7, -8, 9, -10?

2) Придумайте пример такого массива, обработка которого с помощью этой программы приводила бы к правильному результату.

3) Найдите ошибку, допущенную программистом.

Дан одномерный массив числовых значений ,насчитывающий n элементов. Выполните перемещение элементов массива влево k раз ,то есть а(0)—>а(1); а(1)—>а(2); . а(n-1)—>a(0)​

ЯЗЫК: Pascal

Const n=5; m=4;

var s, i, j : integer;

a: array [1.n, 1.m] of

integer;

begin

for i:= 1 to n do

for j:= 1 to m do

a[i,j]:=random(10);

for i:=1 to n do begin

for j:=1 to m do

write ( A[i,j]:5 );

writeln;

end;

S:=0;

For i:=1 to n do

For j:=1 to m do

S:=S+a[i,j];

Writeln(‘сумма элементов

массива равна ‘,S);

end.

Изменить программу таким образом, чтобы:

a. Матрица состояла из 15 элементов вещественного типа;

b. Значения элементов должны меняться в интервале от 3 до 7;

c. В результате выполнения программы должно быть найдено

произведение всех элементов матрицы;

d. Вычисляться сумма элементов матрицы по строкам.

Сформировать массив А, состоящий из 20 чисел, элементы массива вычисляются по формуле А= К+7, К=1,3,5,7…. Массив вывести в строчку.

 Дан массив, содержащий 2016 положительных целых чисел, не превышающих 1000. Необходимо найти и вывести максимальный из тех элементов этого массива, шестнадцатеричная запись которых заканчивается символом B. Если таких чисел в массиве нет, ответ считается равным нулю.

Исходные данные объявлены так, как показано ниже. Запрещается использовать переменные, не описанные ниже, но разрешается не использовать часть из описанных переменных.

Бейсик

CONST N=2016

DIM A(N) AS INTEGER

DIM I, M, K AS INTEGER

FOR I = 1 TO N

  INPUT A(I)

NEXT I

…

End

В качестве ответа Вам необходимо привести фрагмент программы, который должен находиться на месте многоточия. Вы можете записать решение также на другом языке программирования (укажите название и версию языка программирования). В этом случае Вы должны использовать те же самые исходные данные и переменные, какие были предложены в условии.

НАПИСАТЬ ПРОГРАММУ В dev-c++ Составить программу, формирующую одномерный массив, состоящий из N целых элементов. Вычислить сумму положительных элеменnов массива. Определить количество элементов, имеющих четные порядковые номера и являющиеся нечетными числами. Упорядочить элементы массива по возрастанию.