Помогите сделать программку в ПаскалеВ котором 1)Программка выдает извещенье "Вы маль

Помогите сделать программку в Паскале
В котором
1)Программа выдает известье "Вы маль либо дево"
2)Юзер в переменную ST1 задает значение маль либо дево 3)Программка выдает сооб "Ты вульгарна бы играть в куколки"
4) Вводить ответ через переменную ST2 да либо нет
5) Если ST2=да ,а ST1=девочка то выдается сооб "Кого пригласишь с собой"
6)Юзером через переменную ST3 вводит имя
7)Программка выводит сооб "Вы и [Указывается имя] пошли играть!"
8)В неприятном случае (пункт 5) программка выдает сооб "А вы ничего не спутали "
9)Программа выдает сооб "Game Over"

Задать свой вопрос
1 ответ
Var ST1,ST2,ST3:string;
Begin
writeln('Вы мальчишка либо девченка?');
readln(ST1);

writeln('Ты пошла бы играть в куклы?');
readln(ST2);

if (ST2 = 'да') and (ST1 = 'девченка') then begin
writeln('Кого пригласишь с собой?');
readln(ST3);

writeln('Вы и ',ST3,' пошли играть!');
end
else
writeln('А вы ничего не спутали?');

writeln('Game Over');
End.
, оставишь ответ?
Имя:*
E-Mail:


Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт