4. Б
7. 5 -> 25 -> 26 -> 27 -> 28 -> 784 (Г)
10. M = 2 в степени i, где i - это кол-во бит на символ Ответ: 8
9. var a,min,i:integer;
begin
min:=100;
for i:=1 to 3 do
begin
Writeln('Введитп возраст ' ,i, ' призера спартакиады');
readln(a);
if a<min then min:=a;
end;
Writeln('Возраст самого младшего призера - ', min, ' лет');
end.
10. var k,l,x,y,y1:integer;
begin
Writeln('Введиье k');
Readln(k);
Writeln('Введиье l');
Readln(l);
Writeln('Введите координату x точки');
ReadLn(x);
Writeln('Введите координату y точки');
ReadLn(y);
y1:=(k*x)+l;
if y>y1 then Writeln('Прямая лежит над прямой');
if y=y1 then Writeln('Прямая лежит на прямой');
if y<y1 then Writeln('Прямая лежит под прямой');
end.
А) Пенал, тетрадь, учебник.
Б) Папка "Службы", Папка "Игры", Корзина.
В) Диск, Флеш-карта, дискета.
Г) Растения, животные, клетки.
Д) Уравнения, числа, примеры.
Е) Карты, масштабы, мореплаватели.
Ж)Алгоритмы, схемы, данные.