дано целое число Напишите программу вычисления если - вопрос №17837272 от barmin2001g 28.12.2020 05:15

Question

Информатика: дано целое число Напишите программу вычисления если это число имеет положительное значение то Добавить к нему цифру 1 иначе выведет его без изменений​

barmin2001g · Answer

var num:integer;beginreadln(num);if num -1 thennum := num + 1elsenum := num;write(num) ;end....

дано целое число Напишите программу вычисления если это число имеет положительное значение то Добавить к нему цифру 1 иначе выведет его без изменений​

дано целое число Напишите программу вычисления если это число имеет положительное значение то Добавить к нему цифру 1 иначе выведет его без изменений