Предмет: Информатика,
автор: dariks97
Дано целое число Если оно положительное то отнять от него 8, если отрицательное то добавить к нему 6, если нулевое, то заменить его на 10. Вывести результат на экран.
Нужно Паскаль, на завтра. ДАМ 10 балов.
Ответы
Автор ответа:
0
## // PascalАВС.NЕТ 3.9
var n := ReadInteger;
if n > 0 then n -= 8
else if n < 0 then n += 6
else n := 10;
Print(n)
Интересные вопросы
Предмет: Биология,
автор: stejkam07
Предмет: Геометрия,
автор: likaantonova947
Предмет: История,
автор: romanprzhiwalsky82
Предмет: Русский язык,
автор: osipova2008osipova
Предмет: Физика,
автор: mariaprincesa2707