возможность быстрого поиска информации широкие возможности навигаций
Объяснение:
Технология мультимедиа положена в основу создания всевозможных мультимедийных продуктов, характерными особенностями которых являются:
- объединение в одном продукте текстовой, графической, аудио-, видеоинформации, анимаций;
- наличие интерактивного (диалогового) режима работы;
- возможность быстрого поиска информации;
- широкие возможности навигаций;
- возможность работы в реальном времени, в замедленном или в ускоренном темпе;
- дружественный пользовательский интерфейс.
Например, в компьютерной игре задействованы графика и аудиоинформация.
program massiv;
const Sz = 100; // Размер массива
var
a: array [1..Sz] of integer;
i: integer;
max: integer;
counter: integer;
begin
max:=0;
counter:=0;
for i:=1 to Sz do begin
a[i] := random(26) + 10;
if a[i] > max then begin
max := a[i];
end;
end;
writeln('Элементы массива: ');
for i:=1 to Sz do begin
write(a[i],' ');
if a[i] = max then begin
counter := counter + 1;
end;
end;
writeln('');
writeln('Максимальный элемент: ', max);
writeln('Кол-во таких элементов ', counter);
end.
Объяснение:
DIM s AS STRING, asc0 AS INTEGER
CLS
FOR i = 1 TO 26
a(i) = -1
NEXT i
asc0 = ASC("a") - 1
INPUT "Введите слово: ", s
FOR i = 1 TO LEN(s)
k = ASC(MID$(s, i, 1)) - asc0
a(k) = a(k) + 1
NEXT i
k = 0
FOR i = 1 TO 26
IF a(i) > 0 THEN k = k + a(i)
NEXT i
FOR i = 1 TO k
PRINT "Опять"
NEXT i
Тестовое решение:
Введите слово: potato
Опять
Опять