• Нужно решение задачи в PascalABC и нарисованная блок-схема. Помогите пожалуйста.

    Условие задачи:
    В автоматизированной информационной системе содержатся анкетные данные сотрудников учреждения.
    В массиве V(8) содержатся года рождения сотрудников,
    В массиве P(8) – сведения о поле,
    В массиве S(8) – сведения о семейном положении.
    Элемент массива V с номером N – год рождения сотрудника N,
    Элемент массива P с номером N – сведения о поле сотрудника N,
    Элемент массива S с номером N – сведения о семейном положении сотрудника N.

    P(N)=0, сотрудник N женского пола
    P(N)=1, сотрудник N мужского пола

    S(N)=0, сотрудник N холост (не замужем)
    S(N)=1, сотрудник N женат (замужем)


    Определить:
    Минимальный возраст среди замужних женщин

    question img

Ответы 2

  • Спасибо огромное!)
    • Автор:

      hazel1
    • 6 лет назад
    • 0
  • var   i, j, n, min: integer;   v: array[1..8]of integer;   p: array[1..8]of integer;   s: array[1..8]of integer;  begin   min := 999;   for i := 1 to 8 do read(v[i]);   for i := 1 to 8 do read(p[i]);   for i := 1 to 8 do read(s[i]);   for i := 1 to 8 do if(p[i] = 0) and (s[i] = 1) and (v[i] < min) then min := v[i];   write(min);  end.Пример:Входные данные:  22  19  40  33  34  23  45  23   1    0    0    1     1     0     1     0   0    1    1    0     0     1     1     0Выходные данные:19
    answer img
    • Автор:

      lee29
    • 6 лет назад
    • 0
  • Добавить свой ответ

Войти через Google

или

Забыли пароль?

У меня нет аккаунта, я хочу Зарегистрироваться

How much to ban the user?
1 hour 1 day 100 years