1) в мурманской области мужчина выходит на пенсию - вопрос №155503726740 от olegfrolof0198олег 13.09.2021 01:27

Question

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

olegfrolof0198олег · Answer

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.