Заполнить одномерный массив случайными числами вещественного типа и вывести
на экран консольного вывода,количество элементов массива являются константной величиной равной 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.
Ответил sidelnikovan1
0
а после константы нужны точка с зяпятой?
Ответил Аноним
0
Разумеется
Новые вопросы