элемент типа shortint занимает 8 бит или 1 байт. Элемент с индексом [4,6] - 24 элемент. 23*8=184 бита или 23 байта. 68+23=8С(6+2=8 8+4=11(В))
Птица летит
Птица чирикает
Птица кушает (активные)
Птицу кормят
Птицу купают
За птицей ухаживают (пассивные
Мяч скачет
Мяч укатился в канаву
Мяч попал в корзину (активные)
Мячом играют
Мяч забросили в корзину
Мяч пнули (пассивные)
Велосипед упал
Велосипед сломался
Велосипед поржавел (активные)
На велосипеде катаются
Велосипед чинят
Велосипед чистя (пассивные)
<h3>PascalABC.NET 3.4.2, сборка 1843 от 24.10.2018</h3><h3>Внимание! Если программа не работает, обновите версию!</h3>
begin
var (a, b) := ReadReal2;
Println(a > b ? a * b : a + b)
end.
Const max=24;
var M:array[1..max] of integer;
i,j,num:byte;
X:integer;
procedure readArray();
var i:byte;
begin
Write('Введите длину массива M');
Readln(num);
for i:=1 to num do begin
Write('M[',i,']=');
Readln(M[i]);
end;
Writeln();
end;
begin
readArray();
Writeln('Задача: Найти количество элементов, модуль которых меньше X');
Write('Введите X=');
Readln(X);
j:=0;
for i:=1 to num do
if Abs(M[i]) < X then
j:=j+1;
Writeln();
Writeln(j, ' элементов, модуль которых меньше ',X);
end.
К = 1024 • 768i = 16 битt = 1 секν = 75 ГцI=?I = K • i • ν • tI = 1024 • 768 • 16 • 75 • 1 = 210 • 3 • 28 • 24 • 75 = 225 • 222 (бит) = 225 • 219 (байт) = 225 • 29 (Кбайт) = 112,5 • 210 (Кбайт) = 112,5 (Мбайт)Ответ: 112,5 Мбайт)