Определить ранг хищений. - Pascal

Формулировка задачи:

Написать программу на языке паскаль: запрашивает у пользователя размер хищений (р.), определяет и выводит на экран масштаб в соответствии с принятой классификацией (например, если размер хищений меньше 1000 р. – «мелкий», от 1000 до 10 000 – «крупный», свыше 100 000 – «особо крупный»);

Код к задаче: «Определить ранг хищений. - Pascal»

textual
  if x<1000 then WriteLn('мелкий')
  else if x<=10000 then WriteLn('крупный')
  else if x>100000 then WriteLn('особо крупный');

6   голосов, оценка 4.333 из 5


СОХРАНИТЬ ССЫЛКУ