В
Все
М
Математика
А
Английский язык
Х
Химия
Э
Экономика
П
Право
И
Информатика
У
Українська мова
Қ
Қазақ тiлi
О
ОБЖ
Н
Немецкий язык
Б
Беларуская мова
У
Українська література
М
Музыка
П
Психология
А
Алгебра
Л
Литература
Б
Биология
М
МХК
О
Окружающий мир
О
Обществознание
И
История
Г
Геометрия
Ф
Французский язык
Ф
Физика
Д
Другие предметы
Р
Русский язык
Г
География
antonangel88p09szr
antonangel88p09szr
11.08.2022 17:04 •  Информатика

Исполнитель Калькулятор имеет следующую систему команд: 1)прибавь 1 и 2)умножь на 2. С первой из них исполнитель увеличивает число на экране на 2,с второй - в 2 раза 1)Выясните, сколько разных программ, преобразующих число 1 в число 20 можно составить для этого исполнителя. 2)Сколько среди них таких программ,у которых в качестве промежуточного результата обязательно получается число 15? 3)Сколько среди них таких программ,у которых в качестве промежуточного результата никогда не получается 12?

Показать ответ
Ответ:
сказкамоямечта
сказкамоямечта
10.08.2021 02:39

1) Потому что любые данные в памяти компьютера хранятся в виде цепочек битов, т. е. последовательностей нулей и единиц.
2) Преобразование аналоговой формы представления звука в дискретную и обратное.
цифро-аналоговым преобразованием (ЦАП)
аналого-цифровым преобразованием (АЦП)
3) Звуковой процессор, ЦАП, усилитель.
4) Звук, видео, графика, объединенные в мультимедиа приложение, требуют больших объемов памяти. Поэтому для их хранения нужны
достаточно емкие и, желательно, недорогие носители.
5) Современные видеокарты имеют встроенный графический процессор, чтобы не нагружать центральный процессор компьютера.
6) Зрение человека создано для того, чтобы воспринимать тончайшие цветовые оттенки в полной мере и для этой цели идеальным
вариантом будет покупка видеопроектора. Именно это электронное устройство превысить стандартные размеры изображения.

0,0(0 оценок)
Ответ:
Лёшка1203
Лёшка1203
10.03.2022 11:10

var a:array[1..20] of integer;
i,j,k,l,s:integer;
begin
for i:=1 to 20 do begin
randomize;
a[i]:=random(101)-50;
write(a[i],' ');
end;
k:=0;
l:=0;
for i:=1 to 20 do begin
if l<k then l:=k;
k:=0;
for j:=1 to 20 do
if a[i]=a[j] then k:=k+1;
end;
Writeln;
writeln(l);
for i:=1 to 20 do
if i mod 2 = 0 then s:=s+a[i];
writeln(s);
end.

 

Выводит массив из рандомных 20 чисел между -50 и 50

допустим

0 1 -2 1 2 3 5 4 5 8 9 10 14 -14 8 -11 10 45 6 1

 

Затем выводит макс. кол-во похожих

0 1 -2 1 2 3 5 4 5 8 9 10 14 -14 8 -11 10 45 6 1

3

 

И теперь сумму четных элементов

0 1 -2 1 2 3 5 4 5 8 9 10 14 -14 8 -11 10 45 6 1

1+1+3+4+8+10-14-11+45+1=48

 

0,0(0 оценок)
Популярные вопросы: Информатика
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота