Ответ:
Объяснение: на одно ядро может быть несколько потоков
Var
a: array[1..6]of integer;
i,m: integer;
begin
for i:=1 to 6 do
read(a[i]);
writeln(' ');
For i:=2 to 6 do
if (a[i]<0) and ((i mod 2) =0) then
for m:=i downto 2 do
swap(a[m],a[m-1]); for i:=1 to 6 do
write(a[i]:2);
<span>end.
abc pascal</span>
I-память
k-количество пикселей
i-вес одного пикселя
N-палитра
---
I=k*i
N=2^i
i=I/k=1.12
округляем до 1
N=2
в палитре два цвета.
program choise;
var m:integer;
begin
writeln('Введите натуральное число ');
read(m);
if m=1 then
writeln('Привет')
else if m=0 then
writeln('Как дела?')
else
writeln('Пока');
end.
Ответ:
1122
Объяснение:
1) Рассмотрим число - 23. На 3 он не делится без остатка, значит прибавляем к 23 число 2.
23 + 2 = 25.
2) Далее, число 25 не делится на 3 без остатка, значит снова прибавляем 2
25 + 2 = 27
3) Число 27 делится без остатка на 3, значит делим 27 на 3
27 / 3 =9
4) Число 9 делится на 3, значит
9 / 3 = 3.
Получили исходное число.
Итого, чтобы получить из числа 3 число 23 надо выполнить алгоритм
1122