1)55;
2)165;
3)147;
4)16;
5)32;
6)19
7)77;
8)36;
9)80;
10)65;
Объяснение:
Сумма арифметической прогрессии sₙ = (a₁ + aₙ) * n / 2;
Формула n-го члена арифметической прогрессии: aₙ = a₁ + d (n - 1);
Отсюда: n = (aₙ - a₁ + d) / d;
1)
В цикле переменная k принимает значения: 2, 3 , 4, ... 11;
Всего итераций цикла: n =(11 - 2 + 1) / 1 = 10.
В цикле к переменной s прибавляется k => посчитаем сумму арифметической прогрессии:
aₙ = 10, т.к. при 11 цикл прервется.
(1 + 10) * 10/2 = 55.
2)
В цикле переменная k принимает значения: 3, 6 , 9, ... 30;
Всего итераций цикла: (30 - 3 + 3) / 3 = 10.
В цикле к переменной s прибавляется k => посчитаем сумму арифметической прогрессии:
(3 + 30) * 10/2 = 165.
3)
В цикле переменная k принимает нечетные значения: 3, 5 , 7, ... 25;
Всего итераций цикла: n = (25 - 3 + 2) / 2 = 12.
В цикле к переменной s прибавляется k => посчитаем сумму арифметической прогрессии и прибавим начальное значение s = 3:
aₙ = 23, т.к. при 25 цикл прервется.
(1 + 23) * 12 / 2 + 3 = 147.
4)
s k
4 4
8 6
14 8
22 10
32 12
44 14
58 16
5)
s k
0 4
4 8
12 12
24 16
40 20
60 24
84 28
112 32
112 32
6)
s k
4 4
11 7
21 10
34 13
50 16
69 19
7)
В цикле переменная k принимает четные значения: 2, 4, 6, ... 16;
Всего итераций цикла: (16 - 2 + 2) / 2 = 8.
В цикле к переменной s прибавляется k => посчитаем сумму арифметической прогрессии и прибавим начальное значение s = 5:
(2 + 16) * 8/2 + 5 = 77.
8)
s k
0 3
6 6
18 9
36 12
9)
s k
0 4
8 8
24 12
48 16
80 20
10)
s k
1 4
9 8
25 12
49 16
s + k = 49 + 16 = 65.
1-Индексом элемента называется номер элемента в массиве
2-Массив данных имеет общее имя и один тип
3-Массив-это совокупность однотипных данных, хранящихся в последовательных ячейках памяти
4-В записи D[4]=3.5, D обозначает имя массива
5-можно назвать этот ряд:2.3, 5.7, 10.89.
6-правильно описание массива:D: array[1..5] of real
7-команда Randomize
8-Для заполнения массива путем ввода чисел с клавиатуры мы используем оператор Readln
9-Выводит N значений массива на экран
10-Sum:=sum+a(i)
11-Выбирает минимальный элемент массива
12-условие:If a[i]>0 then k:=k+1
13-значение суммы после выполнения следующего фрагмента программы равн.25
14-знач.суммы 21
15-знач.переменн.9
16-нельзя определить значение переменной
17-знач>перемен.6
18-знач.перемен. 2
19-знач.перемен.12
20-знач.перемен.6
program Chernovik;
var i,a,k:integer;
begin
k:=0;
for i:=1 to 8 do
begin
write('Введите ', i,' число: ');
readln(a);
if (a mod 3=0) and (a mod 10=4) then k:=k+1
end;
writeln('Количество чисел, кратных 3 и оканчивающихся на 4, равно: ',k)
end.
Объяснение:
Без массива, просто вводим число и сразу проверяем его на соответствие условию, если подходит, то увеличиваем переменную для результа на 1, в конце вывод результа.