Увеличить число x на 10,если оно положительное,во всех остальных случаях уменьшить его на 10

maximyakimov20p00ywe maximyakimov20p00ywe    3   19.07.2019 17:50    6

Ответы
Brilliana1999 Brilliana1999  22.09.2020 15:23
//Pascal
var
  a: integer;
begin
  readln(a);
  if a > 0 then a := a + 10
  else
    a := a - 10;
  writeln(a);
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика