Составить программу которая заполняет массив из 10 элементов случайными целыми числами из положительные, отрицательные и нулевые числа и выводит на экран.
olgavish761
2
27.03.2019 21:10
2
Другие вопросы по теме Информатика
Lily566
12.05.2021 19:37
virtuspro2000
12.05.2021 19:37
raynis2
12.05.2021 19:37
роолли
12.05.2021 19:35
Катерина26121
17.09.2020 08:25
sako9910
12.01.2022 09:50
BroKeNxHeArT
12.01.2022 09:50
twenty21
12.01.2022 10:00
HelpMePzhalsta
15.01.2021 20:37
Популярные вопросы
- Найдите лишнее слово. обоснуйте свой выбор. упав с велосипеда,...
1 - Что такое бесстрашие, и его значение. + пример из личной жизни....
3 - Мектеп кітапханасынынын қоры 5000 кітап құрайды. барлық кітаптың...
1 - Как приготовить 20 мл 32%раствора азотной кислоты из 63%раствора...
2 - С: стоимость электроэнергии увеличилась на 25 %. насколько %...
3 - Решить окружность, вписанная в прямоугольный треугольник abc,...
1 - 1) -3+6sinx+8cos^2x=0 2) 8sin^2x+6cosx-3=0...
2 - )найдите произведение чисел 7*10^5 и 1,3 *10^-7...
1 - Продолжение боковых сторон ab и cd трапеции abcd пересекаются...
3 - Имена прилогательные в форме сложной сравнительной степени как...
1
var a:array [1..10] of integer;
b,i:integer;
z:real;
begin
randomize;
for i:=1 to 10 do
begin
z:=random;
b:=random(10);
if z>0.5 then a[i]:=b
else a[i]:=-b;
end;
for i:=1 to 10 do
write(' ',a[i]);
end.
если что то не понятно,спрашивай)