Nalmemand
6 год назад
Заполнить одномерный массив случайными числами вещественного типа и вывестина экран консольного вывода,количество элементов массива являются константной величиной равной 6
ОТВЕТЫ
Kristina
Oct 24, 2020
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.
166
Смежные вопросы:
