Отметьте все правильные высказывания о драйверах: 1. обеспечивают реакцию на возникающие ошибки и аварийные ситуации;
2. с их осуществляется контроль за нормальным функционированием компьютера;
3. осуществляется сжатие программ и данных;
4. специальные программы, управляющие работой периферийных устройств;
5. обеспечивают диалог пользователя с компьютером на базе графического интерфейса.​

for a : = 1 to 20 do

begin

    writeln(a,"^2 = ", a*a);

end

или

a: = 1;

repeat

    writeln(a,"^2 = ", a*a);

    a : = a + 1;

until a > 20;

2000 знаков (но точно не уверен) 

наверняка двоичные числа надо только определить где ноль а где один

наверно о - one

10101

10110

10111

11000

11001

вроде как сходится, продолжаем

11010

11011

11100

11101

11110

11111

обратную замену самостоятельно

var m,r: real;

begin

writeln('вычисление расстояния между населенными пунктами.') ; writeln('ведите исходные данные: '); writeln('масштаб карты (количество километров в одном сантиметре)  > ');

read(m); writeln('расстояние между двумя точками, изображающими населенные пункты (см)  > ');

read(r); writeln('расстояние между населенными пунктами ', m*r,' км.');

end.