Дано целое число, если оно является положит, то вычесть из него 10, или отриц, то прибавить к нему 8, или 0 то заменить его на 6.
нужно сделать программу по этому заданию. Паскаль

Лови:beginvar num:integer; //Создаем переменную для хранения числаreadln(num); //Считываем числоif (num > 0) then num := num - 10 //Если > 0else if (num < 0) then num := num + 8 //Если < 0else num := 6; //Если = 0writeln(num); //Выводимend.Пример:Ввод: 15Вывод: 5--------------Ввод: -8Вывод: 0--------------Ввод: 0Вывод: 6...Если не сложно нажми "Спасибо" ;)