Предмет: Информатика, автор: nikitatkachev2000000

Исполнитель "Вычислитель" умеет выполнять только две команды: умножить на 2 и прибавить 1. Придумайте для него наиболее короткий план получения из 0 числа 50.

Ответы

Автор ответа: mrevgen2004

Объяснение:

1) +1 = 1

2) +1 = 2

3) +1 = 3

4) * 2 = 6

5) * 2 = 12

6) * 2 = 24

7) + 1 = 25

8) * 2 = 50

Предыдущий вопрос

Следующий вопрос

Похожие вопросы

Предмет: Русский язык, автор: LARYLywer

. Включение элементов диалога в монолог оратора именуется

a) диалогизацией

b)вопросно-ответным единством

c)авторизацией

d)приёмом провокации

1 год назад

Предмет: Русский язык, автор: LARYLywer

К деловым бумагам группы
«деловая переписка» относятся …

a)сопроводительное
письмо

b)письмо-благодарность

c)пригласительное
письмо

d)объяснительная записка

1 год назад

Предмет: Русский язык, автор: osa704

Полный синтаксический разбор предложения К вечеру низкое солнце скрылось в раскаленной мгле

1 год назад

Предмет: Химия, автор: Gidroponkav

Определите массу раствора, если известно, что в нём содержится 20 грамм сульфата калия, массовая доля которого составляет 15%.

8 лет назад

Предмет: Информатика, автор: Иви0008

ProgramSumma;usescrt;

constn=5;

var a: array[1..n] of integer;

m,i,s: integer; Автоматическое заполнение

случайными числами от1 до20

procedure Input; Procedure Input;

begin begin

for i:=1 to n do p:=1; q:=20; randomize;

begin for i:=1 to n do a[i]:=random(q-p+1)+p;

write('a[',i,']='); readln(a[i]); end;

end

end;

procedure Print;

begin

write('Массив целых чисел А: ');

for i:=1 to n do write(' ',a[i])

writeln; writeln; { пропуск строки }

end;

procedure Sum( m: integer);

begin

s:=0;

for i:=1 to m do s:=s+a[i];

end;

Begin

ClrScr;

Input;{ заполнение массива из 5 элементов }

ClrScr;

Print; { печать заполненного массива }

write('Сколько элементов суммировать: '); readln(m);

Sum(m); writeln;{ суммирование m элементов массива }

writeln('Сумма ',m,' элементов массива равна: ', s);

{ суммирование всех элементов массива }

Sum(n); writeln;

writeln('Сумма всех ',n,' элементов массива равна: ', s);

Write ('Среднее арифметическое всех элементов равно ', s/n);

Readkey;

End.
З А Д А Н И Я:
1. Набрать и исполнить программу.
2. Увеличить число элементов массива.
3. Найти сумму 8 элементов массива.
4. Осуществить ввод количества элементов массива с клавиатуры.

8 лет назад