Составить программу к задаче в паскаль. Дано число. Если оно положительное, то увеличьте его на 1, в противоположном случае уменьшите его на 2. Результат выведите на экран.
Answers & Comments
HIPM
Var num: integer; begin read(num); if num > 0 then write(num + 1) else write(num - 2); end.
1 votes Thanks 1
nsstywv
Здравствуйте! Помогите пожалуйста с информатикой
Answers & Comments
num: integer;
begin
read(num);
if num > 0 then write(num + 1) else write(num - 2);
end.