Б9. В 6 школах города поступили компьютеры. В первую только один, во вторую – 3, втретью – 15 и т. д. (укажите самостоятельно количество компьютеров, поступивших в каждую школу). Подсчитайте общее количество компьютеров. Выведите на экран номера школ, где компьютеры можно расставить в 4 аудитории поровну. а) В готовом шаблоне допишите недостающие операторы. б) Объясните выполнение программы. program school; var L:ARRAY[1. . ] OF ;: integer; BEGIN FOR I:=1 TO 6 DO BEGIN WRITE ('введи количество компьютеров в ', i,' школе')READLN(L[i])WRITELN ('L[',I,']=',L[I]);END;WRITELN ('S=',S);WRITE ('номера школ:');FOR I:=1 TO 6 DOIFWRITE (I, ' ');END.