Дан массив вещественных чисел. каждый элемент, больший 10 заменить на 10 и вывести полученный массив.
139
400
Ответы на вопрос:
1. современный вариант // pascalabc.net 3.1, сборка 1184 от 02.03.2016 begin var n: =random(-100,100); writeln('в числе ',n,' количество разрядов равно ', abs(n).tostring.length) end. тестовое решение: в числе -40 количество разрядов равно 2 2. школьный вариант (понятный большинству учителей) // pascalabc.net 3.1, сборка 1184 от 02.03.2016 var n,k: integer; begin randomize; n: =random(201)-100; k: =1; write('в числе ',n,' количество разрядов равно '); n: =abs(n); while n> 0 do begin n: =n div 10; if n> 0 then inc(k) end; writeln(k) end. тестовое решение: в числе -5 количество разрядов равно 1
Популярно: Информатика
-
Topskiy1331.03.2021 19:17
-
HaskyZ0nG11.08.2022 14:50
-
shaimyr2403.10.2021 19:47
-
nastiaX35225.04.2021 02:10
-
kira75702.04.2021 09:59
-
eviilevii12313.05.2020 07:46
-
vickatrasyuk20.10.2020 13:05
-
69Unicorn6918.02.2021 16:16
-
xasiyeva82p0c95p07.06.2023 00:36
-
Erikalallala09.03.2020 23:03