1. Информатика
  2. Составьте программу , которая

Составьте программу , которая формирует массив из 10 целых чисел значения которых лежат в интервале от - 10 до 10 ( [ 10: 10] ) . программа должна выводить на экран исходный массив затем преобразовать элементы массива , увеличивая в два раза положительные элементы , а для отрицательных элементы менять знак на противоположный . выведите на экран преобразованный массив . в паскале !

Anna2271 Anna2271    1   04.10.2019 11:20    1

Ответы
mvchudakova mvchudakova  09.10.2020 19:28

const n=10;

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

i: integer;

begin

for i:=1 to n do

begin

a[i]:=random(21)-10;

write (a[i]:3,' ');

if a[i]>0 then a[i]:=a[i]*2;

if a[i]<0 then a[i]:=-a[i]

end;

writeln;

for i:=1 to n do write (a[i]:3,' ')

end.

ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
madina20042004 madina20042004  14.05.2020 16:28
Решите задания по инфе Що таке діапазон комірок? 2. Скільки комірок містить зв’язний діапазон А2:В3? 3. Як модифікується формула =С5 у разі її копіювання в комірку, що міститься...
Legendary13 Legendary13  14.05.2020 16:28
В Моделирование это: * o выделение нескольких (двух, трёх) существенных признаков реального объекта. o процесс создания и использования моделей o процесс опознания реального объекта...
Осьминог13 Осьминог13  14.05.2020 16:28
Расскажите процесс работы с графикой на примере: графики для оформления мероприятий, виды графики, оформление листовки и буклеты по типовым шаблонам, ПО для работы с графикой....
iprin iprin  14.05.2020 16:28
мне прямо сейчас это надо​...
karina845 karina845  29.03.2022 02:07
Составить словесно-формальное решение задачи ЗАДАЧА:определить является ли число натуральным,если оно введено с клавиатуры пример на фото...
Ааллалалал44 Ааллалалал44  29.03.2022 01:02
Напишите программу, которая будет работать следующим образом: пользователь вводит сколько угодно чисел до тех пор, пока не введёт ноль, после чего программа останавливается. Использовать...
лосимус лосимус  28.03.2022 23:03
Откройте файл (7_04.xlsx, 7_04.xls, 7_04.ods) электронной таблицы, содержащей в каждой строке три натуральных числа. Определите, сколько среди заданных троек чисел таких, которые...
ilburyatovp0dn15 ilburyatovp0dn15  28.03.2022 22:32
Алгоритм вычисления функции F(n) задан следующими соотношениями: F(n) = n при n ≤3; F(n) = 2 • n • n + F(n - 1) при чётных n 3; F(n) = n• n• n + n + F(n - 1) при нечётных n 3; Определите...
кира19732819863 кира19732819863  28.03.2022 21:34
Вводятся два списка городов, каждый список с новой строки. В списке по три города, записанных через пробел. Если все города в этих списках разные, то объединить их в один список....
МарсСМарса МарсСМарса  07.08.2019 12:20
Дано a7 ^16 b 251 ^8 какое из чисел x отвечает неравенству a 1)247^8. 2)8a^16. 3)248^8. 4)a8^16 с...

Популярные вопросы