Каждый элемент, больший 10, заменить на его квадратный корень - Pascal

Узнай цену своей работы

Формулировка задачи:

дан массив вещественных чисел.Каждый элемент, больший 10, заменить на его квадратный корень.

Решение задачи: «Каждый элемент, больший 10, заменить на его квадратный корень»

textual
Листинг программы 
kol:=0;
for i:=0 to n-1 do
if m[i]0 then kol:=kol+1;

Объяснение кода листинга программы

  1. Переменная kol инициализируется значением 0.
  2. Происходит цикл от 0 до n-1 (предполагается, что n больше 1, иначе цикл не выполнится ни разу).
  3. Внутри цикла проверяется условие m[i]0, где m - это массив, а i - это индекс элемента массива.
  4. Если условие истинно (то есть значение элемента массива больше 10), то к переменной kol прибавляется 1.
  5. После завершения цикла значение переменной kol будет содержать количество элементов массива, которые больше 10.

ИИ поможет Вам:

  • решить любую задачу по программированию
  • объяснить код
  • расставить комментарии в коде
  • и т.д
Попробуйте бесплатно

Оцени полезность:

8   голосов , оценка 4 из 5
Похожие ответы