Pacal
function F() : integer;
var
k,i : integer;
begin
k := 0;
for i := 100 to 999 do
if (i mod 13 = 0) and (i mod 100 <> 3) then
k := k +1;
Result := k;
end;
begin
writeln (f());<span>
end.
const
n = 30;
var
a : array [1..n] of integer;
i,b : integer;
r : boolean;
begin
readln (b);
i := 1;
r := false;
While (not r) and (i <= n) do
begin
if a[i] = b then
r := true;
i := i +1;
end;
if r then
writeln ('Есть')
else
writeln ('Нет'); <span>
end.</span>
</span>
Если изображение использует 1025 цветов тогда нам необходима политра минимум из 2048 цветов
2048=2^11
11 битная
program qq;
var a,b:integer; s:real;
begin
writeln('Введите число а');
readln(a);
writeln('Введите число b');
readln(b);
s:=sqrt(a+(b/a*a)-b);
writeln('S=',S);
end.
<span>1)Оперативная память нужна для временного хранения данных и команд, необходимых процессору для выполнения им операции.
2)
</span><span>Так как при выключении компьютера вся информация из оперативной памяти исчезает, то нам необходимо устройство, которое могло бы хранить все наши программы и личную информацию вне зависимости от того включен компьютер или нет.
</span>3)1 обеспечить на более сложном уровне взаимодействие пользователя и устройства;2 выполнять самые разные задачи;3 поддерживать в порядке все изменения, внесенные для исполнения своих задач пользователем.
выполнять самые разные задачиизадач пользователем.