PASCAL
program aa;
var a : integer;
begin
writeln('Введите день недели');
Read(a);
If (a < 1) or (a>7) then writeln('Такого дня не существует');
If (a > 0) and (a<6) then writeln('Рабочий день');
If a=6 then writeln('Суббота');
If a=7 then writeln('Воскресенье');
end.
Все просто! Ввод, вывод и память в машине тюринга представляют собой ленту, разделенную на ячейки. в каждой ячейке или символ или она пустая. ПРОЦЕССОР МАШИНЫ СПОСОБЕН ЗА ОДИН РАЗ РАССМОТРЕТЬ ТОЛЬКО ОДНУ ИЗ ЯЧЕЕК. ОН МОЖЕТ СТЕРЕТЬ СИМВОЛ В ЭТОЙ ЯЧЕЙКЕ, ЗАПИСАТЬ ДРУГОЙ, ПЕРЕМОТАТЬ ЛЕНТУ ВПЕРЕД-НАЗАД НА НЕСКОЛЬКО ЯЧЕЕК.<span>
</span>
Процессор
<span>сетевая карта
</span>оперативная память
<span>материнская плата
</span>видеокарта
<span>блок питания
</span><span>накопитель (дисковод)
</span><span>ПЗУ
ТО ЧТО Я НАШЁЛ)
</span>
это число в экпоненциальной записи
другими словами нужно запятую передвинуть на 4 знака вправо