Задача 3: Ремонт забора
Забор состоит из N одинаковых вертикальных досок. Некоторые из досок сгнили и нуждаются в замене, для каждой доски известно, нужно ли её заменить. Для ремонта забора можно использовать продающиеся в магазине щиты, которые бывают L разных видов: шириной в 1 доску, в 2 доски, ..., в L досок. Щит нельзя разрезать на части, то есть одним щитом можно заменить не более любых L подряд идущих досок. При этом можно менять не только сгнившие доски, но и хорошие.
Оказалось, что все щиты стоят одинаково, независимо от размера щита. Определите, какое наименьшее число щитов необходимо приобрести, чтобы починить весь забор.
139
329
Ответы на вопрос:
var
x, counter : integer;
begin
readln(x);
x := abs(x);
while x > 0 do
begin
if (x mod 10 = 0) then
counter := counter + 1;
x := x div 10;
end;
writeln(counter);
end.
Популярно: Информатика
-
саша428716.08.2021 00:43
-
миша113301.02.2020 17:24
-
Fluttershy015.04.2022 20:51
-
yakovleva03ow836v13.09.2021 16:14
-
лапка2719.09.2022 16:33
-
Winxsori17.07.2020 18:51
-
ASLiza199222.07.2020 22:16
-
умный32117.01.2020 18:55
-
Princess1111Yulua13.04.2022 14:39
-
Violetta010020.02.2020 03:53