Тема блок схемы: в копилке у гнома было много монет,необходимо положить 100 монет в копилку по одной штуке.

275

492

Посмотреть ответы 2

Ответы на вопрос:

daffar1daffari

Информатика

4,4(14 оценок)

Будет 10

AyanCoolgirlBaku

Информатика

4,4(85 оценок)

//pascal var a, sum: integer; begin write('введите число: '); readln(a); while a < > 0 do begin sum : = sum + (a mod 10); a : = a div 10; end; writeln('сумма цифр = ', sum); if sum mod 2 = 0 then writeln('сумма четная') else writeln('сумма нечетная') end.