Предмет: Информатика,
автор: dpaslar
Заполнить массив A(21) случайными числами в диапазоне от -1 до 17. Выведите его на экран. Pascal abc 9 класс
Ответы
Автор ответа:
0
const
n=21;
var a:array[1..n] of real;
i:integer;
begin
randomize;
for i:=1 to n do begin
a[i]:=random(18)+-1;
write(a[i],' ');
end;
end.
n=21;
var a:array[1..n] of real;
i:integer;
begin
randomize;
for i:=1 to n do begin
a[i]:=random(18)+-1;
write(a[i],' ');
end;
end.
Похожие вопросы
Предмет: Информатика,
автор: Аноним
Предмет: Другие предметы,
автор: elizavetaa875
Предмет: Информатика,
автор: onetheforge
Предмет: Алгебра,
автор: Белка1771
Предмет: История,
автор: MerelinMey01