Напишите программу, которая решает : «дано целое число n. вывести на экран следующее за ним четное число». 12

var n: integer;

begin

readln (n);

if n mod 2 = 0 then write(n+2)

else write(n+1)

end.

32 - вопроса, 32 - ответа

однажды мне подарили ноутбук.до этого был старый компьютер.включив ноутбок, я понял, что он намного лучше бережет зрение, нежели компьютер.я стал беречь его, что научило   меня аккуратности.я купил диски, чтоб установить программное обеспечение на ноутбуке в случае форматирования жесткого диска.он мне стал хорошим другом.

что то вроде такого)