Нужно ввести 5-е число. вычислить сумму чисел стоящих на нечетных позициях.

0123220210 0123220210    1   21.09.2019 06:03    0

Ответы
Karolinka22 Karolinka22  08.10.2020 06:28
Var s,a,b,c:Integer;
begin
Read(s);
a:= s div 10000;
b:= s div 100 mod 10;
c:= s mod 10;
WriteLn(a+b+c);
end.
Жмякаем 'Лучший'
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика