• Задан массив из N элементов. Вычислить сумму тех элементов, которые кратны 5.

Ответы 1

  • Program t1;Var A: array [1..1000] of integer; N, i: Byte; s: Longint;BeginReadln (N);For i:= 1 to N doBeginReadln (A[i]);If A[i] mod 5 = 0 thens:=s+A[i];End;Write (s);Readln;End.
  • Добавить свой ответ

Еще вопросы

Войти через Google

или

Забыли пароль?

У меня нет аккаунта, я хочу Зарегистрироваться

How much to ban the user?
1 hour 1 day 100 years