Паскаль абс 1.Заповнити масив з 3 рядків і 5 стовпців випадковими цілими числами з інтервалу від 1 до 30 і вивести його на екран
2.Знайти суму усіх елементів масиву та вивести на екран
3.Знайти середнє арифметичне усіх елементів масиву та вивести на екран

👇

Открыть все ответы

Ответ:

TRЮM

29.12.2022

2-й игрок получает информацию о том, на какую клетку походил первый. Так как это уже третий ход первого, значит перед этим были заняты 4 клетки (два хода первого + два хода второго). Это значит, что перед 3-м ходом первого свободны 25 - 4 = 21 клетка. Для кодирования информации об одной из 21 клеток нужно 5 бит (решаем неравенство N<=2^i, подбирая минимально возможное значение i)
ответ: 5 бит

1/512 Мбайт = (1024/512) Кбайт = 2 Кбайт = 2048 байт
Всего 2048 символов, значит, для кодировки одного символа нужен 1 байт .
1 байт = 8 бит
С бит можно закодировать 2^8=256 символов
ответ: размер алфавита 256 символов

Для кодировки каждого символа 16-символьного алфавита нужно 4 бит
(решаем неравенство 16<=2^i, подбирая минимально возможное значение i). Далее, одна страница текста содержит 30 * 50 = 1500 символов.
6 страниц текста содержат 6 * 1500 = 9000 символов.
Весь текст содержит 9000 символов * 4 бит = 36000 бит = 4500 байт (приблизительно 4,39 Кбайт)

ответ: 4500 байт

Примеры:

- система автоматической терморегуляции поддерживает заданную температуру (управляющее устройство получает информацию от температурных датчиков, обрабатывает ее - сравнивает реальную температуру с заданной, и передает команды нагревательному элементу - усилить или уменьшить нагрев) - например в кондиционерах
- система программного управления обеспечивают стирку в стиральной машине в заданном режиме
- система записи звука в диктофоне
- система управления станком с ЧПУ (числовым программным управлением)

4,5(29 оценок)

Ответ:

Vasyy123

29.12.2022

Const n=5;
var
a:array[1..n,1..n] of integer;
b:array[1..n] of integer;
i,j,max,min,s:integer;
begin
Randomize;
writeln('Исходный массив:');
for i:=1 to n do
begin
for j:=1 to n do
begin
a[i,j]:=random(21);
write(a[i,j]:4);
end;
writeln;
end;
max:=a[1,n];
for i:=2 to n do
if a[i,n-i+1]>max then max:=a[i,n-i+1];
writeln('1. max = ',max);
for i:=1 to n do
begin
min:=a[i,1];
for j:=2 to n do
if a[i,j]<min then min:=a[i,j];
b[i]:=min;
end;
s:=0;
writeln('2. Массив B');
for i:=1 to n do
begin
write(b[i]:4);
s:=s+b[i];
end;
writeln;
writeln('3. среднее = ',s/n);
for i:=1 to n do
if b[i]>s/n then write(b[i]:4);
writeln;
end.

Пример:
Исходный массив:
10 19 15 17 10
12 12 10 1 5
17 8 8 14 15
12 11 8 0 13
2 2 4 10 6
1. max = 11
2. Массив B
10 1 8 0 2
3. среднее = 4.2
10 8

4,6(87 оценок)

Это интересно:

Кулинария-и-гостеприимство

02.02.2020

Как сделать красивые и вкусные французские макароны с миндалем...

Кулинария-и-гостеприимство

23.06.2020

Как заварить Кунг фу чай - лучший способ насладиться вкусом восточного чая...

Дом-и-сад

10.09.2020

Как установить в доме камеры наблюдения для системы безопасности...

Здоровье