Найти минимальную цифру натурального числаформат ввода: на вход подается натуральное, не превосходящее 30000.формат вывода: целое число.пример входных данных: 651пример выходных данных: 1пояснение: отсутствует.сделайте на паскале плз
267
302
Ответы на вопрос:
var
x, sum: integer;
begin
read(x);
while(x gt; 0) do
begin
if(x mod 10 lt; = 5) then sum : = sum + x mod 10;
x : = x div 10;
end;
write(sum);
end.
1подойти к холодильнику 2 открыть холодильник 3 взять связку бананов 4 закрыть холодильник 5 оторвать себе один банан 6 открыть холодильник 7 положить остальную связку назад в холодильник 8 закрыть холодильник.
Популярно: Информатика
-
vifi05.11.2020 13:03
-
evauvanova199804.03.2022 08:02
-
alinaabpamenko199620.01.2020 20:41
-
Гузеля200616.02.2023 13:40
-
fukkacumi201707.08.2022 01:01
-
Finger228001.03.2022 07:09
-
pastoling25.09.2021 17:57
-
БолатовДосжан25.10.2020 18:39
-
Arina1226101.08.2020 15:16
-
Богдана34814.03.2023 23:11