Var
a,s: integer;
begin
readln(a);
s := 0;
while a >0 do
begin
if a mod 10 mod 2 <> 0 then
inc(s, a mod 10);
a := a div 10;
end;
writeln(s);
<span>end.</span>
While (tnum != 0) //tnum, tden - числитель и знаменатель искомой дроби
{
if (tnum < tden)
{
temp = tnum;
tnum = tden;
tden = temp;
}
tnum = tnum - tden;
}
gcd = tden; //вычисляем наибольший общий делитель
numerator = numerator / gcd; //делим числитель и знаменатель на
НОД, получаем сокращенную дробь
denominator = denominator / gcd;
Ответ:
ИТ
Объяснение:
<h3>ИТ -
Информацио́нные техноло́гии</h3><h3>ИКТ - Информационно-коммуникационные технологии</h3>