Дано:
K=128*128
N=256
----
I - ?
---- Решение -----
Найдем i, тк N = 2^i, тк N=256, то i = 8 <=> 2^3
I = K * i
I= 128*128*8...
Упростим решение, запишем как:
I=2^7 * 2^7 * 2^3 = 2^17 - количество бит. НО! Нам надо в КБ, тогда
I(кб) = I(бит)/2^13 = 2^4 = 16 Кб
Var
n, k: integer;
a, b, i: integer;
begin
read(n);
k := 0;
read(a);
for i := 2 to n do
begin
read(b);
if (a = 2) and (b = 2) then
k := k + 1;
a := b
end;
writeln(k)
<span>end.</span>
Это последовательность команд, предназначенная исполнителю, в результате выполнения которой он должен решить поставленную задачу.Может быть представлен в цифровом и словесном виде.
определенность, результативность,массовость,дискретность, конечность.
Следование» — это часть алгоритма, в которой все команды исполняются одна за другой в порядке их записи.
Разветвляющий алгоритм – это алгоритм, в котором в зависимости от условия выполняется либо одна, либо другая последовательность действий.
1.Начало-конец.(блок)
2.блок команды,процесса,действия.
3.блок логического условия
блок ввода-вывода данных
предопределенный процесс
блок цикла со счетчиком
парный блок для пред и постусловием.
соединитель .
Цикл -это многократно повторяющиеся действия с разными значениями исходных данных.
цикл с предусловием ,постоусловием,параметром.
Цикл с предусловием представляет собой оператор потока управления, который позволяет выполнять код повторно на основе заданного булевого условия.
Начало.
Тело цикла.
Условие.
Конец.
Это ответы на все вопросы.Говори Спасибо.
Var
n:longint;
s:string;
k:integer;
begin
Read(n);
Str(n,s); k:=Length(s);
Writeln(Ord(s[k-1])+Ord(s[k-4])-2*Ord('0'))
end.