Задание 2
Program ada4a2;
Var rost:Integer;
Begin
WriteLn(Введите ваш возраст: );
Read(rost);
If (rost<178) and (rost>168) Then Write(Приняты)
Else Write(Не приняты);
ReadLn;
End.
Если ответ по предмету Информатика отсутствует или он оказался неправильным, то попробуй воспользоваться поиском других ответов во всей базе сайта.