Регистрация
Krisomanka01
03.01.2023 12:15
Информатика
Есть ответ 👍

Дан массив одномерный(30 элементов), вычислить сумму элементов, найти максимальное, вывести те элементы, которые делятся на 13 pascal заранее огромное

176
177
Посмотреть ответы 2

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

aruka00000
aruka00000
4,8(22 оценок)
// pascalabc.net 3.1, сборка 1218 от 12.04.2016 begin   var a: =arrrandom(30,1,100); a.println;   writeln('s=',a.sum,', max=',a.max);   write('кратные 13: '); a.where(n-> n mod 13=0).println end. тестовое решение: 91 45 76 84 16 23 33 56 70 99 9 56 18 75 48 49 22 90 27 52 94 85 42 45 87 7 78 90 40 5 s=1612, max=99 кратные 13: 91 52 78
romanesterov2
romanesterov2
4,6(23 оценок)

ответ:d-6 b-17

Объяснение:

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