Помогите нужно использовать программу PascalABC Вариант 2 Программа PascalABC Кровяное...

Question

Помогите нужно использовать программу PascalABC
Вариант 2
Программа PascalABC
Кровяное давление у старшеклассников считается нормальным, если верхняя его граница H ≤ 100, а нижняя h ≥ 60 и H-h ≥ 30.
Составьте программу, которая в зависимости от введенных значений H и h, выдает одно из следующих значений: "нормальное", "повышенное", "пониженное", "не норма".

Answer 1

Var
hn,hv:integer;
begin
    writeln('Введите верхнее и нижнее давление');
    readln(hv,hn);
        if (hv<=100)and(hn>=60)and(hv-hn>=30)then
            writeln('норма');
        if (hv>100)then
           writeln('повышенно');
        if hn<60 then<br>           writeln('низкое');
        if hv-hn<30 then<br>           writeln('не норма');
end.

Comments

Как мне ваш ответ сделать лучшим?

---

Не поняла вопрос.

---

Если я не ошибаюсь за ответы даются быллы?

---

баллы*

---

А, поняла. Что-то не вижу Лучший ответ около вопроса

---

Должна быть такая кнопочка

---

Если нет - не беда. Ничего страшного

---

Почему-то нет, может позже появится!?

---

Очень выручили) Я не знал что делать.

---

Да, не за что