300 за решение: "найдите сумму цифр заданного 7-значного числа стоящие в разрядах сотен тысяч, сотен и десятков (1 234 567). "

vano125125125 vano125125125    3   21.06.2019 11:40    0

Ответы
zulfiya22 zulfiya22  02.10.2020 07:22
Var a, count: integer;
begin
readln(a);
a:=a div 10;
count+=a mod 10;
a:=a div 10;
count+=a mod 10;
a:=a div 1000;
count+=a mod 10;
writeln(count);
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика