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

ruevtop ruevtop    2   26.09.2019 22:01    1

Ответы
Пашаg Пашаg  08.10.2020 21:12
Var
  n:real;
begin
  Write('Введите число: ');
  Readln(n);
  if n>0 then n:=n-5
  else if n=0 then n:=n+20
  else n:=n/6;
  Writeln('n=',n)
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика