Информатика “Программирование разветвляющихся алгоритмов” 1. Увеличить число X на 10, если оно положительное, во всех остальных случаях уменьшить на 10. 2. Увеличить число X на 5, если оно положительное.

Вопрос от посетителя

Информатика “Программирование разветвляющихся алгоритмов”

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

2. Увеличить число X на 5, если оно положительное.

Отвечает Илюха:

var x:integer;

Begin

  read(x);

  if x>0 then x:=x+10

  else x:=x-10;

  writeln(x);

 

 

  read(x);

  if x>0 then x:=x+5;

  writeln(x);

End.

Добавить свой ответ