Var N:integer;
begin
read(N);{Считываем значение N}
if(N mod 5 = 0) then N:=N+3;{Если оно кратно 5ти, то увеличиваем на 3}
writeln(N);{Выводим значение N}
end.
Copyright © 2024 SCHOLAR.TIPS - All rights reserved.
Answers & Comments
Var N:integer;
begin
read(N);{Считываем значение N}
if(N mod 5 = 0) then N:=N+3;{Если оно кратно 5ти, то увеличиваем на 3}
writeln(N);{Выводим значение N}
end.