с информатикой умоляю

var i,s: integer;

begin

writeln('summa ');

for i: =100 to 999 do

if i mod 17 =0 then s: =s+i else s: =s+0;

writeln(s)

end.

var ch,n,i: longint;

ch1,s: string;

begin

  read(s,ch);

  n: =length(s);

  writeln(n,' ',ch);

  str(ch,ch1);

  for i: =1 to n do if s[i]=ch1 then write(i,' ');

end.

а) компьютер, предназначенный для эксплуатации одним пользователем, то есть для личного использования.

б)совокупность программ, процедур и правил, а также документации, относящихся к функционированию системы обработки данных .

в) комплекс и обрабатывающихпрограмм, которые, с одной стороны, выступают как интерфейс между  устройствами вычислительной системы иприкладными программами, а с другой стороны  — предназначены для устройствами, вычислительными процессами, эффективного распределения вычислительных ресурсов между вычислительными процессами и организации надёжных вычислений. это определение применимо к большинству современных операционных систем общего назначения.

г)поименованная последовательность байтов.

д)лицо илиорганизация, которое использует действующую систему для выполнения конкретной функции.

е)разновидность интерфейсов, в котором одна сторона представлена человеком (пользователем), другая  — машиной/устройством. представляет собой совокупность средств и методов, при которых пользователь взаимодействует с различными, чаще всего сложными, машинами, устройствами и аппаратурой.

февраль зимний месяц

май весенний месяц

август летний месяц 

сентябрь осенний месяц