А бесконечном поле есть одна вертикальная стена и несколько горизонтальных стен, пересекающих эту вертикальную стену. К концам вертикальной стены не при-мыкают горизонтальные стены. Длины горизонтальных стен и их количество неиз-вестны. Расстояния между горизонтальными стенами не известны. Робот нахо-дится в клетке, расположенной непосредственно справа вертикальной стены, около ее нижнего края. На рисунке указан один из возможных расположения стен и Робота (Робот обозначен буквой «Р» Напишите для Робота алгоритм, закрашивающий все клетки, расположенные непосредственно справа и слева от вертикальной стены. Робот должен закрасить толь-ко клетки, удовлетворяющие данному условию. Например, для приведённого выше рисунка Робот должен закрасить следующие клетки (см. рисунок). При исполнении алгоритма Робот не должен разрушиться, выполнение алгорит-ма должно завершиться. Конечное расположение Робота может быть произвольным. Алгоритм должен решать задачу для любого допустимого расположения стен, их количества и размера, а также расстояния между горизонтальными стенами. Заранее за

MS DOS
Операционная система MS DOS (Microsoft Disk Operating System) – самая распространённая ОС на 16-разрядных персональных компьютерах, состоит из следующих модулей:базовой системы ввода/вывода (BIOS);блока начальной загрузки (Boot Record);модуля расширения базовой системы ввода/вывода (Io.SYS);модуля обработки прерываний (MsDos.SYS);командного процессора (Command.COM);утилит MS DOS.Каждый из указанных модулей выполняет определённую часть функций, возложенных на ОС. Места постоянного размещения этих модулей различны. Так, базовая система ввода/вывода находится в постоянном запоминающем устройстве (ПЗУ), а не на дисках как все остальные модули. Windows 1.0 Когда фирма Microsoft созвала пресс-конференцию на выставке Comdex, проходившей в ноябре 1985 года в Лас-Вегасе, многие посчитали это событие последним шансом, особенно после того как среда Windows не была выпущена, как было обещано, в июне того же года. Пресс-конференция плавно перетекла в презентацию нового продукта - Microsoft Windows 1.0. Windows95 Windows 95 представляет собой универсальную высокопроизводительную многозадачную и многопотоковую 32-разрядную ОС нового поколения с графическим интерфейсом и расширенными сетевыми возможностями. Windows 95 – интегрированная среда, обеспечивающая эффективный обмен информацией между отдельными программами и предоставляющая пользователю широкие возможности работы с мультимедиа, обработки текстовой, графической, звуковой и видео информации. Интегрированность подразумевает также совместное использование ресурсов компьютера всеми программами. Применяемый в Windows 95 защищённый режим не позволяет прикладной программе в случае сбоя нарушить работо системы, надёжно предохраняет приложения от случайного вмешательства одного процесса в другой, обеспечивает определённую устойчивость к вирусам. Пользовательский интерфейс Windows 95 прост и удобен. В отличие от оболочки Windows 3 эта операционная система не нуждается в установке на компьютере операционной системы DOS. Она предназначена для установки на настольный ПК и компьютерах блокнотного типа с процессором 486 или Pentium. Рекомендуемый размер оперативной памяти (ОЗУ) 8-32 Мбойт. После включения компьютера и выполнения программ BIOS операционная система Windows 95 автоматически загружается с жёсткого диска. После загрузки и инициализации системы на экране появляется рабочий стол, на котором размещены различные графические объекты. Пользовательский интерфейс спроектирован так, чтобы максимально облегчить усвоение этой операционной системы новичками и создать комфортные условия для пользователя.

1.

program xopow1;
   uses   crt;
   var  
 a, b, Sek: integer;  
begin  
writeln('Введите границы:');  
repeat    
readln(a, b);  
until b >= a;  
 clrscr;  
for a := a to b do
    begin    
Sek := a * 60;    
writeln(a, ' мин. = ', sek, ' сек.')  
end
end.

2.

program xopow2;
  uses crt; 
Var
 z:integer;
 f,x,y:real; 
Begin 
clrscr; 
Writeln;
X:=10000;
Y:=(x/100)*10;
for z:=1 to 7 do 
 Begin 
X:=x+y; 
Writeln(Z,' -й день тренировок спортсмен пробежал ',X:3:2,' Км.'); 
End; 
Writeln('Нажмите Enter...'); 
Readln; 
end.