напишите программку(паскаль) запрашивает с клавиатуры у юзера размер хищений (р.),

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

Задать свой вопрос
1 ответ
//PascalABC.NET 3.2 сборка 1318

Var
  a:real;
begin
readln(a);
if alt;100 then
  writeln('Маленький')
    else
      if (agt;=100) and (alt;1000) then
        writeln('Большой')
          else
            writeln('Особо большой');
end.

Пример ввода:
1001
Пример вывода:
Особо большой
, оставишь ответ?
Имя:*
E-Mail:


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

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

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

Войти на сайт