Задание №1702/19

Задание

В программе используется одномерный целочисленный массив A с индексами от 0 до 9. Значения элементов равны 15; 3; 54; 13; 2; 13; 65; 93; 21; 81 соответственно, т. е. A[0] = 15; A[1] = 3 и т. д.

Определите значение переменной k после выполнения следующего фрагмента программы, записанного ниже на разных языках программирования.

Pascal

Копировать

k := 0;
for i := 0 to 9 do begin
  m := A[i] div 10 mod 10;
  if i > m then begin
    k := k + 1;
    A[i] := A[9 - m]
  end
end;

Копировать

k = 0;
for (i = 0; i < 10; i++) {
  m = A[i] / 10 % 10;
  if (i > m) {
    k++;
    A[i] = A[9 - m];
  }
}

Basic

Копировать

K = 0
FOR I = 0 TO 9
  M = A(I) \ 10 MOD 10
  IF I > M THEN
    K = K + 1
    A(I) = A(9 - M)
  END IF
NEXT I

Python

Копировать

k = 0
for i in range(10) :
  m = A[i] // 10 % 10
  if i > m :
    k += 1
    A[i] = A[9 - m]

Решение

Подробнее...

Ответ

Подробнее...

Комментарии (0)

Комментариев пока нет...