Выполнить округление натурального числа N с точность до десятков (стандартные фунКции округления и функции работы со строками не использовать)

Кции округления и функции работы со строками не использовать)

Ответы:
Екатерина Макитра
18-07-2018 06:04

Var  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.

Картинка с текстом вопроса от пользователя ДЕНЯ САЛО

⭐⭐⭐⭐⭐ Лучший ответ на вопрос «Выполнить округление натурального числа N с точность до десятков (стандартные фун» от пользователя ДЕНЯ САЛО в разделе Информатика. Задавайте вопросы и делитесь своими знаниями.

Открой этот вопрос на телефоне - включи камеру и наведи на QR-код!