katyunyagolubmailru
31.01.2023 20:18

Решить на паскале заданное натуральное число n андрей записал ручкой на листе бумаги, после чего ножницами порезал лист по линиям, которые были оставлены ручкой. в результате лист распался на несколько частей. напишите алгоритм, который определяет сколько частей получилось.

Нажмите на рекламу ниже и сразу увидите ответ
Популярные вопросы:
Ответ:
Alina221006
01.09.2020 10:49
Var n, s: integer;
begin
readln(n);
s := 1;
repeat
case n mod 10 of
0, 6, 9: inc(s);
8: inc(s, 2)
end;
n := n div 10
until n = 0;
writeln(s)
end.
За правильность не отвечаю))
0,0(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота