Вниманию тех, кто знает Паскаль (АВС):
7. Задан массив Х [ 1 ... N ] . Какое условие надо поставить вместо многоточия, чтобы найти в переменной S количество элементов массива, десятичная запись которых заканчивается на 6?
S : = 0 ;
for k : = 1 to N do begin
if ......... then
S : = S + 1
end ;
8. Задан тот же массив. Какое условие надо поставить вместо многоточия, чтобы найти минимальный элемент массива в переменной M?
M : = X [ 1 ] ;
for k : = 2 to N do begin
if ......... then
M : = X [ k ]
end ;
9. Задан тот же массив. Какой оператор надо поставить вместо многоточия, чтобы найти номер максимального элемента массива в переменной M?
M : = 1 ;
for k : = 2 to N do begin
if X [ k ] > X [ M ] then
..............
end ;
Answers & Comments
7. Чтобы проверить последнюю цифру на какое-то условие нам нужно ее "откусить" это в Паскале мы можем сделать с помощью mod.
x[k] mod 10 = 6
8. Поиск минимума, стандартная задачка, если что-то меньше минимума, то это что-то становится минимумом.
x[k] < M
9. Здесь почти тоже самое, что и в номере 8, только теперь мы ищем максимум, но не значение, а индекс максимального элемента.
m := k;