Является ли институт системой? доказать ответ.

varslovo,simval: string; i,k: integer; begink: =0; write('vvedite slovo '); readln(slovo); write('vvedite simval '); readln(simval); for i: =1 to length(slovo) dobeginif slovo[i]=simval then k: =k+1; if slovo[i]=simval then writeln(i,' '); end; if k> =1 thenwriteln('yes vstre4aets9 ',k,' raz, na pozicii ',i)else writeln('no'); writeln; end.вот в одном решении

совершенное число это число равное сумме своих делителей отличных от самого числа

var i, s,j : integer;

begin for i : = 5 to 200 do begin s : = 0; for j : = 1 to i div 2 do if (i mod j = 0) then s : = s + j; if s = i then writeln(i); end; end.

так как число , имеющих «тройки» по и , равно 7, то число учеников, имеющих только две «тройки» - по и по , равно 7-5=2. тогда 17-4-5-2=6 учеников имеют две «тройки» - по и по языку, а 22-5-2-11=4 ученика только две «тройки» - по и по языку. в этом случае без «тройки» учится 40-22-4-6-4=4 ученика. а имеют «тройки» по двум предметам из трех 6+2+4=12 человек.

формула имеет вид: =b$1*$a2