Що буде результатом виконання даної програми Хорошие люди Об’єкт переміститься на 100 кроків

Об’єкт переміститься на 10 кроків

Об’єкт переміститься на 1000 кроків

Нічого не відбудеться

100 кроків

Объяснение:

блок робить 10 кроків , а при натискані кнопки блок повторюється 10 разів

10 по 10 = 100 кроків

(если сумма цифр числа делится на 3, то число делится на 3 нацело)

var a, s: integer;

begin

s: =0;

writeln ('введите число');

while a< > 0 do

begin

a: = a mod 10  

s: =s+a;

end;

if  s mod  3 = 0  then writeln ('делится') else

writeln ('не делится');

end.

бухгалтерия, документооборот.