Question

Вниманию тех, кто знает Паскаль (АВС): 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 ;

Answer 1

7. Чтобы проверить последнюю цифру на какое-то условие нам нужно ее "откусить" это в Паскале мы можем сделать с

x[k] mod 10 = 6

8. Поиск минимума, стандартная задачка, если что-то меньше минимума, то это что-то становится минимумом.

x[k] < M

9. Здесь почти тоже самое, что и в номере 8, только теперь мы ищем максимум, но не значение, а индекс максимального элемента.

m := k;