Две небольшие задачки по программированию.
№1. Чему будет равно значение переменной "с" в результате выполнения фрагмента программы?
a:=1257; c:=0;
while a>0 do begin
if a mod 2<>0 then b:=a mod 10; c:=c+b;
a:=a div 10; end;
№2. Каким должно быть <условие>, чтобы после выполнения фрагмента программы переменная "s" была равна сумме элементов главной диагонали?
s:=0; for i:=1 to N do
for j:=1 to N do if <условие> then s:=s+a[ij];

1) с=18 и это легко получить, просто выполнив программу в Паскале.2) В условии надо поставить i=jОднако, вместо дурацкой конструкцииfor i:=1 to N do for j:=1 to N do if <условие> then s:=s+a[i,j];нормальные люди пишут так:for i:=1 to N do s:=s+a[i,i];