Кто, что может сделать.... помогите.... !!!ПОЖАЛУЙСТА!!!

0 голосов
32 просмотров

Кто, что может сделать.... помогите.... !!!ПОЖАЛУЙСТА!!!


image
image

Информатика (5.2k баллов) | 32 просмотров
Дан 1 ответ
0 голосов
Правильный ответ

1) Может
2) б)
3) а) 6, б) 12, с) 6, d) нет
4) В массив на место A[5] вписывают 0, а все элементы больше 5-го сдвигают вправо.
5) а)
6) с)
7) а)
8) for i:=1 to 15 do if i mod 5 = 0 then write (A[i], ' ');
9) k:=0;
for i:=1 to 8 do if A[i]<=10 then k:=k+1;<br>write (k);
10) var A: array [1..6] of integer
var i, S: integer
BEGIN
for i:=1 to 6 do read (A[i]);
S:=A[1]+A[2];
for i:=2 to 5 do if (A[i]+A[i+1] mod 2 = 1) and (A[i]+A[i+1] < S) then S:=A[i]+A[i+1];
write (S);
END.
11) Программа ищет максимальный элемент массива и выдат число 7.
12) Каждый элемент массива превращается в сумму двух соседних элемента.
Выдаст массив -1 5  7  3  1


(320k баллов)
0

ПОЖАЛУЙСТА ОГРОМНОЕ!!!!!!!!!!!!!!!!!