Дана последовательность целых чисел, заканчивающаяся числом с (константа). ( с является признаком окончания ввода и в саму последовательность не входит.)
с=-56 найти максимум из чисел, произведение цифр которых делится на 7.
с++

171

260

Посмотреть ответы 1

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

кек946

Информатика

4,8(53 оценок)

Var n,i: integer; a: array[1..6]of integer; begin randomize; for i: =1 to 6 do begin a[i]: =random(100); write(a[i], ' '); end; for i: =1 to 6 do begin if (a[i] mod 5=0)and(a[i]mod 2=0) then n: =n+1; end; writeln('kolichest=',n); end.

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

Темы

Получить
полный доступ

150 000+ пользователей

Оформить подписку