Написать программу на С Дано целое число N (N > 0). С операций деления нацело
и взятия остатка от деления определить, вычислить количество
нечетных цифр в записи числа N.
220
419
Ответы на вопрос:
program summa;
uses crt;
var s,n,c: integer;
begin
clrscr;
write('введите числа коннц ввода 0: ');
s: =0; c: =0;
repeat
readln(n);
c: =c+1;
if (n mod 2)=0 then if ((n> =5)and (n< =25)) then s: =s+n;
until (n=0) or (c=1000) ;
write('сумма ',c,' чётных чисел в диапазоне от 5 до 25: ',s);
readkey;
end. : d
Популярно: Информатика
-
ssofia14popova03.11.2020 02:05
-
grinanovatana206.12.2021 15:37
-
Hhjkklknbggfddxxg28.04.2022 21:29
-
оля191123.02.2020 01:43
-
accacherrygdghvcg11.05.2021 17:51
-
malinasch19.02.2023 07:45
-
nastyafominto18.05.2020 17:39
-
3344227p06s5705.10.2022 00:55
-
erfsdgfRyde27.04.2020 02:38
-
Polina5545428.01.2022 16:49