Лучшие помощники
- Megamozg 2205 б
- Matalya1 1800 б
- DevAdmin 1720 б
- arkasha_bortnikov 900 б
- Dwayne_Johnson 865 б
2 апреля 2023 10:02
997
Составить блок-схему нахождения количества цифр в натуральном числе.
1
ответ
// Блок схема и листинг программы в приложениях.
PROGRAM SUM_ZNAK;
var
n, i, sum: integer;
begin
Read(n);
sum:=0;
while (n > 0) do begin
sum := sum+1;
n := n div 10;
end;
Writeln(sum);
end.
PROGRAM SUM_ZNAK;
var
n, i, sum: integer;
begin
Read(n);
sum:=0;
while (n > 0) do begin
sum := sum+1;
n := n div 10;
end;
Writeln(sum);
end.

0
·
Хороший ответ
4 апреля 2023 10:02
Остались вопросы?
Еще вопросы по категории Информатика
Кого считают изобретателем W W W и когда это произошло...
A = [12, 18, 6, 11, 13] summa = 0 for x in A: if x % 2 != 0: &...
Ниже приведена программа, записанная на пяти языках программирования. Было проведено 9 запусков программы, при которых в качестве значений переменных...
( Pascal ABC.net ) Составьте программу: Дано 5-ти значное число (78906) с помощью div и mod нужно выделить цифры из числа....
Дан алгоритм для Робота: алг нач нц 53 раз вправо; закрасить кц кон Робот выполнит 53 шагов вправо и закрасит эти клетки, если не будет встр...