Массив: Каждый элемент, больший 5, заменить его квадратом. - Free Pascal

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

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

Помогите пожалуйста с задачей. Заранее спасибо.

Каждый элемент больший 5, заменить его квадратом. Заполнить массив случайными целыми числами из [1,8]

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

textual
Листинг программы
for i:=1 to n do
  a[i]:=randomrange(1,8);
...
for i:=1 to n do
  if a[i]>5 then
   a[i]:=sqr(a[i]);
...

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

  1. Задание: Заменить каждый элемент массива, больший 5, на его квадрат.
  2. Создание массива a размером n с помощью цикла for i:=1 to n do a[i]:=randomrange(1,8);
  3. Создание массива a размером n с помощью цикла for i:=1 to n do a[i]:=sqr(a[i]);
  4. Проверка условия a[i]>5 с помощью if.
  5. Если условие выполняется, то присваивается новое значение a[i] равное квадрату a[i].
  6. Выполнение двух циклов for.

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


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

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

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