6) вводится последовательность чисел. конец ввода – число > 100. определить количество четных чисел, а каждое нечетное возвести в квадрат. 7) вводится последовательность чисел. конец ввода – отрицательное число. определить сумму цифр младших разрядов всех чисел, за исключением отрицательного. 8) дано число. вывести по отдельности все его цифры, определить их сумму, сумму только нечетных цифр, сумму старшего и младшего разрядов.
159
443
Ответы на вопрос:
// pascalabc.net 3.3, сборка 1549 от 17.10.2017 // внимание! если программа не работает, обновите версию! begin var a: =readseqintegerwhile(x-> x< =100).toarray; writeln('количество четных чисел равно ',a.where(x-> x.iseven).count); a.transform(x-> x.isodd? x*x: x); a.println end. пример 35 24 38 83 110 количество четных чисел равно 2 1225 24 38 6889 begin writeln('s=',readseqintegerwhile(x-> x> =0).select(x-> x mod 10).sum) end. пример 16 24 19 21 45 0 23 -21 s=28 begin var n: =readinteger('n='); var st: =new stack < integer> ; while n> 0 do begin st.push(n mod 10); n: =n div 10 end; var a: =st.toarray; a.println(','); writeln('сумма цифр: ',a.sum); writeln('сумма нечетных цифр: ',a.where(x-> x.isodd).sum); writeln('сумма старшего и младшего разрядов: ',a.first+a.last); end. пример n= 53214212 5,3,2,1,4,2,1,2 сумма цифр: 20 сумма нечетных цифр: 10 сумма старшего и младшего разрядов: 7
1.налить в чайник воду 2.открыть кран газовой горелки 3.зажечь спичку 4.поднести спичку к горелке 5.поставить чайник на плиту 6.выключить газ 7.ждать пока закипит вода.
Популярно: Информатика
-
danilstal1422.04.2023 05:10
-
sen4enkostas30.11.2021 10:19
-
aimsen26.03.2020 16:26
-
isanatoliy2519930.07.2021 07:53
-
03alibek02.04.2023 03:56
-
maga05050809.07.2022 02:13
-
sherbakovaaaa26.12.2022 07:12
-
Cocos22823.08.2022 07:41
-
Egor16200724.03.2020 08:24
-
Uchenik00ot00boga01.09.2020 18:50