нужна помощь

[n1ce > Kuzia]

cherez char rabotaet a kak sdelat6 chto s tekstom eshe bilo
nuzno bilo eshe cherez TEKST delat6
vot tok kak nepoimu

[Jasper92]

пожалуйста помогите решить задачу
даны элементы от 150 до 250 нужно найти количество элементов сумма которых кратна двум
взаране благодарен

[DM_bite]

даны элементы от 150 до 250

Элементы чего? Массива? Или просто числа от 150 до 250?

Дал задачу и слинял + никаких своих наработок + название темы + нарушение правила "один вопрос - одна тема".

[Jasper92]

она решается через цикл
через это условие
x:=abc
a:=x div 100
b:=xmod 100 div 10
c:=x mod 10

[DM_bite]

она решается через цикл
через это условие
x:=abc
a:=x div 100
b:=xmod 100 div 10
c:=x mod 10

Это что вообще) Вообще-то кратное 2 это число, которое делится на 2 без остатка

Кароче вот, на скорую руку.Задача наипростейшая .Писал на Delphi(Паскаля под рукой не оказалось, но разница минимальна)

  var A:array [150..250] of integer;
      n,m,k: integer;
begin
   m:=0;
   k:=0;
   for n:= 150 to 250 do
    begin
     ReadLn(A[n]);
     if A[n] mod 2 = 0 then m:=m+A[n];
      if A[n] mod 2 = 0 then k:= k+1;
    end;
     WriteLn('Summa kratnih 2 = '+IntToStr(m));
      WriteLn('Kol-vo kratnih 2 = '+IntToStr(k));
      ReadLn;
end.

P.S.: Если я все правильно понял
P.S.S.: Я кое-что напутал, здесь задача верна, относительно четных чисел, но мы знаем что сумма чисел кратных 2 и сумма четных чисел - не одно и то же... Будет время перепишу задачу.

[capta1n]

сумма всех четных и всех нечетных попарно элементов кратна двум

[Jasper92]

ответ должен получиться 50 (количество элементов сумма которых кратно двум)

а это должно как нам объяснили должно присутствовать непосредственно в задаче
x:=abc
a:=x div 100
b:=x mod 100 div 10
c:=x mod 10

[Jasper92]

это просто числа не массив от 150 до 250
(всмысле все и четные и нечетные)

[DM_bite]

сумма всех четных и всех нечетных попарно элементов кратна двум

Знаю.

это просто числа не массив от 150 до 250
(всмысле все и четные и нечетные)

Вот теперь дошло

[Jasper92]

DM_bite пожалуйста вылажи программу