Ответы на вопрос:
Var l: integer; l1: real; lm: integer; begin write('введите расстояние в сантиметрах '); read(l); l1: =l/100; lm: =trunc(l1); //округляет значение до близжайшего вычитая из него -0.5 writeln(lm,' метров'); end.
Популярно: Информатика
-
ryzik198803.04.2021 15:53
-
NeMaximilan08.03.2020 23:02
-
Ikramhaus22130.01.2023 15:28
-
рудный109.03.2020 04:39
-
liza136701.06.2020 07:49
-
слааллалаала31.05.2021 15:53
-
Maxguvci19.07.2020 23:25
-
shpep01.04.2020 08:49
-
kudryavcevanat24.02.2022 04:19
-
loloika11.03.2023 12:32