Решите пожалуйста на ПаскалеНа if case.Если введённое число положительное, то отнять

Решите пожалуйста на Паскале
На if case.Если введённое число положительное, то отнять из него 5, если равно нулю, то прибавить 20, во всех других случаях разделить на 6

Задать свой вопрос
Стойчев Павел
И на case сможете пожалуйста решить
1 ответ
Var
  n:real;
begin
  Write('Введите число: ');
  Readln(n);
  if ngt;0 then n:=n-5
  else if n=0 then n:=n+20
  else n:=n/6;
  Writeln('n=',n)
end.
, оставишь ответ?
Имя:*
E-Mail:


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

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

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

Войти на сайт