НАДО НАПИСАТЬ Программку В PASCALПрограмма проводит анкетирование студентов. Студенты вводят

НАДО НАПИСАТЬ Программку В PASCAL
Программка проводит анкетирование студентов. Студенты вводят Ю - если он юноша, Д - если женщина и количество баллов за экзамен (от 1 до 70 баллов). Программка обязаны выдать в какую группу попал этот чел: девицы, набравшие меньше либо одинаково 35 баллов идут в группу технологов, а больше 35 баллов - в группу менеджеров; юноши набравшие больше 35 баллов идут на инженера, а набравшие меньше либо одинаково 35 баллов - в металлургию

Задать свой вопрос
1 ответ
Program sort;
var sex:string;
    points:integer;
begin
  writeln('Введите пол');
  readln(sex);
  writeln('Введите кол-во баллов');
  readln(points);
  if sex = 'Д' then begin
    if points lt;= 35 then
      writeln('В группу технологов')
    else
      writeln('В группу менеджеров');
  end
  else begin
    if points lt;= 35 then
      writeln('В группу металургов')
    else
      writeln('В группу инженеров');
  end;
end.
, оставишь ответ?
Имя:*
E-Mail:


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

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

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

Войти на сайт