Склавиатуры вводится целое положительное число. вычислить сумму нечётных цифр.(pascal)
270
338
Ответы на вопрос:
Var n,k,s: integer; begin write('n='); readln(n); s: =0; while n> 0 do begin k: =n mod 10; if k mod 2 < > 0 then s: =s+k; n: =n div 10; end; writeln('s=',s); end. пример: n=123456 s=9
пусть в гараже х грузовых машин, тогда 750-х легковых.
6х+(750-х)*4 = 3024
6х+3000-4х = 3024
2х=24
х=12
ответ: грузовых машин 12, легковых - 738
Популярно: Информатика
-
yliana12118.04.2020 08:18
-
daskatyhg08.03.2021 05:21
-
lizperepelitsa10.09.2021 02:30
-
Hemmgirl04.05.2020 14:31
-
myrzik5293p081ps05.05.2023 17:52
-
lavbi329.12.2020 12:31
-
IKristin25.06.2020 11:13
-
ersultanplay03.04.2022 06:01
-
виктория155229.03.2021 12:18
-
Komar100605.12.2021 11:44