Впаскале написать программе, решите: дано число.если оно кратно 5,то увеличить его на 3
hfyvjfarioS
1
24.04.2019 16:30
0
Другие вопросы по теме Информатика
nika55551
17.10.2019 11:05
Emmaasakura
25.08.2019 18:30
dianaknyazeva
27.10.2020 13:46
Timurrovt456
27.10.2020 13:44
Dmitry0232141
27.10.2020 13:43
moscow1506
27.10.2020 13:43
Karbobo
27.10.2020 13:42
Мαлинкα
27.10.2020 13:41
LineyNikki
27.10.2020 13:41
тисрлю
27.10.2020 13:41
Популярные вопросы
- Один вопрос . какую силу надо приложить чтобы поднять из воды бетонную...
1 - Плоды томата бывают круглыми и грушевидными. ген круглой формы доминирует....
2 - Впервой корзине 40 яблок во второй 55 яблок причём масса яблок второй...
2 - Почему умирает левша в сказе лескова?...
2 - Петя идёт со скоростью 6 км/ч, а дима - 4 км/ч. запишите: 1) скорость...
3 - Укажите органы дыхания паука-крестовика....
3 - Найдите неизвестный член пропорции: 6,8 : 2,5 =х : 1,5?...
3 - Два колеса соединены ремнем. диаметр одного из них в 2 целых 1/2...
2 - Теплоход за 3 дня км.во второй и третий день в два раза больше,чем...
3 - Удушистого горошка пурпурный цвет доминирует над белыми, какое потомство...
3
Var N:integer;
begin
read(N);{Считываем значение N}
if(N mod 5 = 0) then N:=N+3;{Если оно кратно 5ти, то увеличиваем на 3}
writeln(N);{Выводим значение N}
end.