Дано простое число. Найти следующее за ним простое число.
-Нужно предусмотреть соответствие вводимого числа типу integer и положительному значению
- если число не является простым программа должна вывести сообщение "Это не простое число. Повторите попытку"
Программа Паскаль
i,k,N : Integer;
Begin
For i:=0 to 6 do m[i]:=0;
Readln(N);
k:=6;
While N>0 do
Begin
If N>=Power(2,k) then
Begin
N:=N-Trunc(Power(2,k));
Inc(m[k]);
end else Dec(k);
end;
For i:=0 to 6 do Writeln(Power(2,i),' ',m[i],' шт.');
end.
Еще вариант:
Const
NN = 7;
money : array[1..7] of Integer = (1,2,4,8,16,32,64);
Var m : array[1..NN] of Integer;
i,k,N : Integer;
Begin
For i:=1 to NN do m[i]:=0;
Readln(N);
k:=NN;
While N>0 do
Begin
If N>=money[k] then
Begin
N:=N-money[k];
Inc(m[k]);
end else Dec(k);
end;
For i:=1 to NN do Writeln(money[i],' ',m[i],' шт.');
end.
2. До сборки - Да. Любое устройство в компе ожидает входные данные, дальше как то их обрабатывает и выдаёт обратно, алгоритмы обработки обсалютно разные для каждого устройства (жёсткий, оперативка, bios)
После - тем более да, так как без системы каждый элемент компа бессмыслен и бесполезен. Каждый из них дополняет друг друга.
После включения - да, вся система начинает реагировать как то и отвечать (выходные сигналы - принтер, экран, вибрация на джойстике, загорается лампочка на камере когда идёт чтение видео с камеры)
3. Свойства зависят от внутренних параметров каждого компонента. На примере компа - частота процессора обеспечивает с какой скоростью обрабатываются данные, оперативка - сколько памяти храниться в ней для быстрого вызова и передачи на процессор, на жёстком его объём и скорость чтения/записи.
Каждый компонент важен в системе, есть ключевые (процессор, опертивка) от которых многое зависит, а есть не особо зависимые параметры компонета (объём жёсткого) . И т. д. и т. п. Надеюсь дал более менее развёрнутый ответ.