1. Главная
  2. Библиотека
  3. Информатика
  4. Составить программу на языке Паскаль для решения следую...
Решение задачи на тему

Составить программу на языке Паскаль для решения следующей задачи: Дан одномерный массив. Замените все отрицательные элементы массива их квадратами, положительные элементы оставьте без изменения. Входные данные для размерности массива и значения

  • Информатика
Составить программу на языке Паскаль для решения следующей задачи: Дан одномерный массив. Замените все отрицательные элементы массива их квадратами, положительные элементы оставьте без изменения. Входные данные для размерности массива и значения

Условие:

Составить программу на языке Паскаль для решения следующей задачи:

Дан одномерный массив. Замените все отрицательные элементы массива их квадратами, положительные элементы оставьте без изменения. Входные данные для размерности массива и значения элементов массива задайте самостоятельно.

Решение:

Задаём размерность массива n=10, значения элементов массива - случайные.

program z_2;

const n=10;

var a: array[1..n] of integer;

i:integer;

begin

rand...

Выбери предмет