Составьте программу определения количества четных цифр в данном целом числе и вывода второй его цифры.
Kristina2005fomina
3
22.12.2020 23:03
6
Другие вопросы по теме Информатика
vladgas78
16.11.2020 15:40
trisk
16.11.2019 16:16
красава005
16.11.2019 16:23
maevava
16.11.2019 16:24
Vspichka
16.11.2019 16:24
Zoya20060609
22.10.2021 00:39
mariya191215
22.10.2021 00:39
pascha2104
22.10.2021 00:45
мажорчик2
25.08.2019 17:10
Популярные вопросы
- Правопредложить проект статьи Конституции РФ и написать обоснование...
3 - Как можно сплюсовать дробь11/132+1/30...
3 - ваще ничего не понимаю , матеша не моё ...
3 - Некое растровое изображение было сохранено в файле p1.bmp как 24-разрядный...
1 - Выполните задание по образцуОбразец :в восемь часов (стемнеть)....
2 - Сделать морфологический разбор глагола.По дороге зимней, скучной...
1 - Продолжение в других во это 2...
1 - 1.Какие признаки глагола имеет причастие? 2.Какие признаки прилагательного...
2 - «Какие впечатления и размышления возникли у вас в связи с чтением...
1 - решить уравнение 1) 64:8+(а-39)*5=732) (х+7262)-735=820034...
3
var
N: integer;
s: string;
i,c: byte;
begin
ReadLn(N);
Str(N,s);
c:=0;
for i:=1 to Length(s) do
if s[i] in ['0','2','4','6','8'] then
Inc(c);
Writeln(s[2]);
WriteLn(c);
ReadLn
end.