Определите значение переменной b после выполнения фрагмента алгоритма

Код программы:

var a:integer;

begin

 write('Введите возраст автовладельца: ');

 readln(a);

 if (a > 40) then begin

    writeln('Выберите место эксплуатации:');

    writeln('1. Город');

    writeln('2. Сельская местность');

    readln(a);

    if (a = 1) then begin

       write('Введите стаж: ');

       readln(a);

       if (a > 10) then

         writeln('Страховать')

       else

         writeln('Не страховать')

    end

    else

       writeln('Страховать')

 end

 else begin

    writeln('Езда без аварий?');

    writeln('1. Да');

    writeln('2. Нет');

    readln(a);

    if (a = 1) then

      writeln('Страховать')

    else begin

      writeln('Выберите тип автомобиля:');

    writeln('1. Минивэн');

    writeln('2. Спорткар');

    readln(a);

    if (a = 1) then

      writeln('Страховать')

    else

      writeln('Не страховать')

    end;

 end;

end.

№1

1) Устройство вывода

2) Процессор

№2

1) Клавиатуры

2) Принтере

№3

Устройства ввода: клавиатура

Устройства вывода: монитор, наушники, принтер

№4

1) Веб-камера

2) Проектор

Объяснение:

№5

Операционная система изображена на первой картинке (Windows 7)

№6

1) Управление устройствами компьютера (ресурсами)

2) Ведение файловой структуры.

3) Пользовательский интерфейс, т.е. диалог с пользователем.

№7

Не могу разобрать сообщение (низкое качество фотографии)

№8

Wi-Fi

Bluetooth

USB

№9

Мобильность (удобство в использовании)

Легкость создания и расширения сети

№10

ИК-порт: телефон - компьютер

Bluetooth: беспроводные наушники\колонка - телефон