Лучшие помощники
- Megamozg 2205 б
- Matalya1 1800 б
- DevAdmin 1720 б
- arkasha_bortnikov 900 б
- Dwayne_Johnson 870 б
2 апреля 2023 10:02
1103
Составить блок-схему нахождения количества цифр в натуральном числе.
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
Остались вопросы?
Еще вопросы по категории Информатика
Растровый графический редактор предназначен для: * 1)Преобразования текстовой информации и графическую 2)Создания и обработки изображений, сохраняемых...
объём сообщения равен 11 Кбайт. Сообщение содержит 11 264 символа. какова мощность алфавита, с помощью которого записано сообщение?...
Выберите прикладные программы для создания презентаций: ⭕ Microsoft PowerPoint, OpenOffice Impress ⭕ Multiplan, Quattro Pro, SuperCalc ⭕ Microsoft Wor...
Что такое идентификатор в Паскале?...
Как называется программа в первом секторе диска, которая загружает в память ядро операционной системы?...