Помогите срочно, пожалуйста!!!

1. Чему равна переменная y. Если у:=12+ random (4)

2. Составьте программу нахождения числа долгожителей (более 100 лет) Краснодарского края

Ответ: 1. Переменная Y будет равна числу от 13 до 152. Программа:var  a, b:integer; BEGIN  a:= 5000000; // Число жителей  b:= 3; // Процент долгожителей  writeln('Ответ: ', (a * (b / 100))); END.Объяснение: 1. Т.к. функция random(4) означает, что будет сгенерировано число от 0 до 3. Следовательно 12 + 1 = 13, 12 + 3 = 15.2. Взял за основу какое-то количество населения (переменная а) и процент долгожителей (переменная b). Далее вычислил количество долгожителей по проценту.