Написать программу на Паскале: Среди 10 целых чисел вычислить сумму трехзначных чисел, кратных 4

uses crt; а что значит эта строчка?)

подключение модуля. если не проходили не пиши. она не обязательна

ок, спасибо большое)

program summa;uses crt;var n,summ,I:integer;begin summ:=0;for I:=1 to 10 do begin read (n); if ((n >=100) and (n <=999)) and (n mod 4 = 0) then summ:=summ+n end; writeln (summ);end.