Заполнить одномерный массив случайными числами вещественного типа и вывести
на экран консольного вывода,количество элементов массива являются константной величиной равной 6
Ответы
Ответ дал:
0
Const
N = 6;
Var
A:array[1..N] of real;
i:integer;
Begin
For i:= 1 to N do
Begin
A[i]:=random()*100;
Write(A[i]:0:3,' ')
End;
End.
N = 6;
Var
A:array[1..N] of real;
i:integer;
Begin
For i:= 1 to N do
Begin
A[i]:=random()*100;
Write(A[i]:0:3,' ')
End;
End.
Ответ дал:
0
а после константы нужны точка с зяпятой?
Ответ дал:
0
Разумеется
Похожие вопросы
2 года назад
6 лет назад
9 лет назад