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