Помогите с задачкой по информатике ** языке паскаль, Текст задачи.Заполнить массив с...

0 голосов
15 просмотров

Помогите с задачкой по информатике на языке паскаль, Текст задачи.Заполнить массив с именем X случайными значениями и вывести эти значения на экран. Размерность массива 12, все элементы целого типа. Удвоить значение каждого элемента массива и вывести на экран


Информатика (271 баллов) | 15 просмотров
Дан 1 ответ
0 голосов

const N = 12;

const lim = 65535;

var array1: array [1..N] of real;

       i: integer;

begin

randomize;

for i:=1 to N do begin

array1[i]:= random(-lim, lim) * 2;

writeln(array1[i]);

end

end.


(1.7k баллов)