Выполнить округление натурального числа n с точность до десятков (стандартные функции округления и функции работы со строками не использовать)
Kamila28032001
1
08.08.2019 02:50
1
Другие вопросы по теме Информатика
Pakimon4ikYT
26.05.2020 16:31
OgoKatya
26.05.2020 16:31
Mimi1602
08.09.2019 01:30
Veroni4ka7090
08.09.2019 01:30
LILIAGNATIV
08.09.2019 01:30
snezhana9197
08.09.2019 01:30
sashazhuravleva
08.09.2019 01:30
1Harius1
15.04.2019 21:40
Bakeneko77
16.04.2021 14:00
Популярные вопросы
- Вычислите коэффициент данного произведения: -(5 7/12 × (-6)×х...
1 - Электрон влетает в однородное магнитное поле индукция которого 20 мтл,перпендикулярно...
3 - Розкрийте значення слова кішка та складіть твір 6-9 речень будь-ласка...
3 - Разобрать слово как часть речи: свистит, копошаться,готовят....
2 - Глагол приказал какое время и число?...
3 - Как ты думаешь , надо ли восстонавливать фаросский маяк? почему?...
3 - План до 7 розділу твору митькозавр із юрківки...
2 - Автобус ехал 5 часов со скоростью 72.8км\ч и 4 часа со скоростью 79.1...
2 - Как читается на это не перевод,а именно чтение на up, doesn t it just...
3 - Врассказе м.м. прившин определить настроение автора : )...
3
n: integer;
a,b: integer;
begin
Readln(n);
a:= n mod 10;
b:=n div 10;
if a>4 then inc(b);
b:=b*10;
Writeln(b)
end.