2015-12-28 14:25:15 +03:00
|
|
|
// Использование массива
|
2015-05-14 22:35:07 +03:00
|
|
|
const n=10;
|
|
|
|
|
|
|
|
|
|
var a: array [1..n] of real;
|
|
|
|
|
|
|
|
|
|
begin
|
|
|
|
|
for var i:=1 to n do
|
|
|
|
|
a[i] := Random*10;
|
2015-12-28 14:25:15 +03:00
|
|
|
writeln('Содержимое случайного массива вещественных: ');
|
2015-05-14 22:35:07 +03:00
|
|
|
foreach x: real in a do
|
|
|
|
|
write(x:4:2,' ');
|
|
|
|
|
end.
|
