1) в мурманской области мужчина выходит на пенсию с 55, а женщина с 50 лет в том случае, если их северный трудовой стаж составляет 15 лет. определите, является ли человек пенсионером, если известен его возраст, пол, северный стаж. 2) составить блок-схему решения квадратного уравнения(рассмотреть случаи: d> 0,d=0, d=0

var Age : integer;    {Возраст}
     Sex : char;        {Пол}|
     Stag: integer;    {Стаж}
     Flag: boolean;    {Логическое ДА или НЕТ}
begin
WriteLn('Age='); ReadLn(Age);
WriteLn('Sex='); ReadLn (Sex);
WriteLn('Stag='); ReadLn(Stag);
Flag:=false;
If (Sex='M')  and (Age>=55) and (Stag>=15) then Flag:=true;
if (Sex='F') and (Age>=50) and (Stag>=15) then Flag:=true;
If (Flag=true) then WriteLn('НА ПЕНСИИ') else Writeln('ЕЩЕ РАБОТАЕТ');
ReadLn;
end.