Язык программирования - паскаль ввести целое число и определить количество цифр в нем. так же дан алгоритм: отсекаем последнюю цифру, при этом увеличиваем счетчик на единицу. надо остановиться, пока n< > 0. буду (:
293
441
Ответы на вопрос:
Var n,i : integer; begin readln(n); i : = 0; while(n < > 0) do begin n : = n div 10; i : = i+1; end; writeln(i); end.
Популярно: Информатика
-
zhenyazhitenko13.06.2021 12:50
-
d2e0n0i5s01.09.2022 21:57
-
maryanazarfdFj15.10.2022 07:11
-
Мунтян200219.11.2020 06:24
-
snddrayuk31.08.2022 11:02
-
Kaytha03.09.2022 16:31
-
ЧерриБерри29.07.2022 16:23
-
wolfbz09.05.2023 03:34
-
Алиса201624.06.2020 02:50
-
egor53503.03.2022 03:58