ПОМОГИТЕ,пожалуйста Var A: Array[1..6] of Integer; k, S: Integer Елементи масиву А мають
значення: А[i] 3 2 5 1 7 2 Проаналізуй програмний код: M := a[1]; For k := 2 to 6 do . .If M < a[k] Then M := a[k]; Визнач, скільки разів буде виконаний оператор M := a[k].Ответы на вопрос
Ответ:
2 раза
Объяснение:
var
a : array [1..6] of integer= (3,2,5,1,7,2);
k, s, m : integer;
begin
m := a[1];
s := 0;
for k:=2 to 6 do
if m < a[k] then begin
m := a[k];
inc(s)
end;
writeln(' s = ', s)
end.
Давайте розглянемо код крок за кроком, щоб визначити, скільки разів буде виконаний оператор M := a[k].
Ми оголосили масив
Aта змінніk,S. МасивAмає розмірність від 1 до 6 і містить наступні значення:cssA[1] = 3 A[2] = 2 A[3] = 5 A[4] = 1 A[5] = 7 A[6] = 2Ми ініціалізуємо змінну
Mзначенням першого елемента масивуA[1], тобтоM = 3.Далі ми виконуємо цикл
for, в якому зміннаkзмінюється від 2 до 6.У циклі ми перевіряємо, чи поточне значення
Mменше заA[k]. Якщо ця умова виконується (тобто,M < A[k]), то ми оновлюємо значенняMнаA[k]. Інакше,Mзалишається без змін.
Тепер давайте підрахуємо, скільки разів виконується оператор M := A[k] в цьому циклі:
- Коли
k = 2,Mне більше заA[2], тобтоM := A[2]не виконується. - Коли
k = 3,Mменше заA[3], томуM := A[3]виконується іMоновлюється на 5. - Коли
k = 4,Mне більше заA[4], тобтоM := A[4]не виконується. - Коли
k = 5,Mменше заA[5], томуM := A[5]виконується іMоновлюється на 7. - Коли
k = 6,Mне більше заA[6], тобтоM := A[6]не виконується.
Отже, оператор M := A[k] виконується два рази (коли k = 3 і коли k = 5) під час виконання цього циклу.
Похожие вопросы
Топ вопросов за вчера в категории Информатика
Последние заданные вопросы в категории Информатика
-
Математика
-
Литература
-
Алгебра
-
Русский язык
-
Геометрия
-
Английский язык
-
Химия
-
Физика
-
Биология
-
Другие предметы
-
История
-
Обществознание
-
Окружающий мир
-
География
-
Українська мова
-
Информатика
-
Українська література
-
Қазақ тiлi
-
Экономика
-
Музыка
-
Право
-
Беларуская мова
-
Французский язык
-
Немецкий язык
-
МХК
-
ОБЖ
-
Психология
-
Физкультура и спорт
-
Астрономия
-
Кыргыз тили
-
Оʻzbek tili
