дан массив из n элементов(Xi). Найти и напечатать 1. элементов массива меньше 30
2. сумму элементов массива, которые больше 12
Приложения:
Ответы на вопрос
Ответил Аноним
0
PascalABC.NET 3.4.2, сборка 1864 от 11.11.2018
Внимание! Если программа не работает, обновите версию!
begin
var a := ArrRandom(ReadInteger('n='), -50, 50);
a.Println;
Println('Элементов, меньших 30:', a.Where(t -> t < 30).Count);
Println('Сумма элементов, больших 12:', a.Where(t -> t > 12).Sum);
end.
n= 15
3 -14 -47 6 -28 -41 -24 -11 36 41 35 13 3 48 16
Элементов, меньших 30: 11
Сумма элементов, больших 12: 189
Ответил allynce
0
ладно ответ будет в виде блок-схемы?
Ответил Аноним
0
Ответ уже дан. С чего это я буду делать двойную работу из-за Вашего ляпа?
Ответил Аноним
0
Более того, я Вам скажу по секрету: тут очень не любят заданий с рисованием, так что шанс получить картинку невысок.
Ответил Аноним
0
Это потому, что большинство отвечающих на вопросы - люди взрослые. Мы набираем ответы на компьютере, а рисовать на компьютере блок-схемы - долго и нудно. А на листиках от руки с последующим фотографированием телефоном - это делают Ваши ровесники.
Ответил Аноним
0
Но тех школьников, кто действительно разбирается в программировании, тут немного.
Новые вопросы