Помогите с задачкой по информатике на языке паскаль,
Текст задачи.Заполнить массив с именем X случайными значениями и вывести эти значения на экран. Размерность массива 12, все элементы целого типа. Удвоить значение каждого элемента массива и вывести на экран
Текст задачи.Заполнить массив с именем X случайными значениями и вывести эти значения на экран. Размерность массива 12, все элементы целого типа. Удвоить значение каждого элемента массива и вывести на экран
More Questions From This User See All
Answers & Comments
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.