Устройство обработки информации называется процессор
Паскаль
Program time ;
Var t : Integer;
Begin
WriteLn ('Введите время');
ReadLn (t) ;
If (t>=0) and (t<6) then
WriteLn ('Ночь') ;
If (t>=6) and (t<12) then
WriteLn ('Утро') ;
If (t>=12) and (t<18) then
WriteLn ('День') ;
If (t>=18) and (t<24) then
WriteLn ('Вечер') ;
End.
Лайк кста
Сканер состоит из нескольких частей механической которая движется вдоль листа на нем расположена лампа подсветки, свет отражаясь от листа попадает на зеркало которое в свою очередь отражает его на чувствительную матрицу вот ка на картинке