1)как, используя функцию random(x), можно получать числа в диапазонах: от 1 до 10, от -10 до +10, от 50 до 100? 2) какие значения может принимать целая переменная y если в программе записано : y : =10+ ranodom (5)? 3) составьте программу заполнения массива из 100 чисел случайными значениями из диапозона от -20до 20. подсчитайте в этом массиве колличество положительных и колличество отрицательных значения
263
381
Ответы на вопрос:
1)
a: =1+random(10);
a: =-10+random(20);
a: =50+random(50);
2)
10, 11, 12, 13, 14
3)
program zadacha;
const n=100;
type massiv=array[1..1000] of int64;
var a: massiv;
i: int64;
begin
randomize;
for i: =1 to n do
a[i]: =-20+random(41);
end.
1.
random(10)+1;
random(21)-10;
random(100)+50;
2.y =[10; 14]
3.
var
arr = array[1..100] of real;
rand : real;
i : integer;
p,n: integer;
begin
for i : = 1 to 100 do
begin
arr[i] : = random(41)-20;
i : = i+1;
end;
for i : =1 to 100 do
begin
if arr[i] < 0 then
begin
n : = n+1;
end;
if arr[i]> 0 then
begin
p : = p+1;
end;
end;
writeln("positives: ", p);
writeln("negatives: ",n);
readln;
end.
Формула шенона: 2^i=n, где n - объём информации, i - количество бит. i = [log_2 (n)] - округление в большую сторону 1 байте = 8 бит. 1 трижды запускается либо красная, либо зелёная ракета. n = 2^3 = 8 ответ: 8 2 i = [log_2 (800)] = [9.6438] = 10 бит на ученика объём 320 учащихся = 320 * 10 = 3200 бит = 400 байт ответ: 4 3 i = [log_2 (10+12+12)] = [5.0875] = 6 бит на символ 6 * 11 = 66 бит = 8.25 байт ~= 9 байт 9 * 60 = 540 байт ответ: 3 4 i = [log_2 (5*5)] = [4.6439] = 5 бит на клетку 15 ходов + начальная позиция = 16 клеток 16 * 5 бит = 80 бит = 10 байт ответ: 1
Популярно: Информатика
-
ник309620.08.2022 04:32
-
Anatoliy111111120.11.2020 06:09
-
Sundywer15.07.2021 12:15
-
mariy3031.12.2021 11:40
-
aidos0278gmailcom09.03.2021 05:03
-
chuckcher13.01.2022 09:49
-
wwwshev2424.04.2021 14:33
-
Seleno4ka13610.12.2022 05:52
-
толян5022.06.2022 07:17
-
ТаяDuda213308.11.2021 12:01