Дан одномерный массив из 30 элементов массива задать случайным образом от -30 до 30. посчититать количество элементов величина которых по модулю не превосходит 7
Vania161
2
19.05.2019 11:50
0
Другие вопросы по теме Информатика
filatevanastya1
04.11.2019 18:55
2303010
16.02.2021 12:27
iordanaurikap06yjs
16.02.2021 12:27
irina83soft071
21.04.2020 14:09
lerka157
21.04.2020 14:09
Derety11
08.03.2019 16:20
kanevskiygabe
03.11.2020 10:34
Alinaakconova9
03.11.2020 10:34
derugaboris200p08t6d
03.11.2020 10:34
123вшагао
03.11.2020 10:34
Популярные вопросы
- 1жали быкакой африке — высокой или низкой — вы продолжиски нерудных полезных...
1 - приход к власти коммунистов в странах европы и азии ; выбрать любую страну, в...
3 - Решить 56: 9=? деление с остатком...
2 - Какими были особенности феодализма как нового общественного порядка средневековья...
3 - А) начертите квадрст, прямоугольник и произвольный четерехугольник с периметром...
3 - Решите уравнение 72 : х = 8 9х = 81 12х = 24 + 24 8х =72 - 16 24 : х = 12 - 8...
2 - Какие поступки героев вы какие только оправдываете какие осуждаете...
1 - 50 б план ко 22 песни иллиады вас...
3 - Реакція: сіль+кислота=основа+нова сіль...
2 - Вариант 1. а1. затачиваемый нож нагревается за счет……. выберите правильный ответ...
2
var
a : array [1..30] of integer;
count, i : integer;
begin
count := 0;
for i := 1 to 30 do
a[i] := round (random (60)) - 30;
for i := 1 to 30 do
if abs (a[i]) <= 7 then inc (count);
writeln (count);
end.