В паскале написать программе,пожалуйста решите: Дано число.Если оно кратно 5,то увеличить его на 3

В паскале написать программе,пожалуйста решите: Дано число.Если оно кратно 5,то увеличить его на 3
Гость
Ответ(ы) на вопрос:
Гость
Var N:integer; begin read(N);{Считываем значение N} if(N mod 5 = 0) then N:=N+3;{Если оно кратно 5ти, то увеличиваем на 3} writeln(N);{Выводим значение N} end.                    
Не нашли ответ?
Ответить на вопрос
Похожие вопросы