Регистрация
ВикторияТуп
13.11.2020 18:52
Информатика
Есть ответ 👍

Подходит ли для симс4 леново идеапад 300-15ибр (lenovo ideapad 300-15ibr)

153
299
Посмотреть ответы 3

Ответы на вопрос:

12345678298
12345678298
4,7(44 оценок)

Мальвина1122
Мальвина1122
4,5(90 оценок)

да, конешно подходик.

jimmy223
jimmy223
4,4(87 оценок)

const n=100;

var i,sum: integer;

    a: array[1..n] of integer;

begin

  for i: =1 to n do begin

    readln(a[i]);

    if(a[i] = 0) then

      break;

  end;

  for i: =1 to n do begin

    if(a[i] < > 0) then begin

      if(a[i] mod 6 = 0) and (a[i] mod 10 = 6) then

        sum: =sum + a[i];

    end;

  end;

  writeln(sum);

end.

Популярно: Информатика