М
Молодежь
К
Компьютеры-и-электроника
Д
Дом-и-сад
С
Стиль-и-уход-за-собой
П
Праздники-и-традиции
Т
Транспорт
П
Путешествия
С
Семейная-жизнь
Ф
Философия-и-религия
Б
Без категории
М
Мир-работы
Х
Хобби-и-рукоделие
И
Искусство-и-развлечения
В
Взаимоотношения
З
Здоровье
К
Кулинария-и-гостеприимство
Ф
Финансы-и-бизнес
П
Питомцы-и-животные
О
Образование
О
Образование-и-коммуникации
kosmagalaxy
kosmagalaxy
17.04.2022 02:06 •  Информатика

Используя рекурсию, запрограммируйте функцию evenSum :: integral a => [a] -> A, которая возвращает сумму тех элементов списка чисел, которые четны (четны). evenSum [1,2,3,4] ~>* 6
evenSum [4,3,2,1] ~>* 6
evenSum [] ~>* 0
Поскольку мы хотим, чтобы вы запрограммировали функцию с рекурсии, в этой задаче вводятся следующие ограничения:

у вас нет фильтра, карта, concatMap, выражения производится, foldl, foldr1, foldl1, молния, zipWith, zip3, zipWith3 и сумма функций (некоторых других аналогичных функций от прелюдии, которые выходят за рамки данной статьи также отключаются);

👇
Открыть все ответы
Ответ:
Jekils
Jekils
17.04.2022
Компьютерная графика - это область деятельности, в которой компьютеры наряду со специальным программным обеспечением используются в качестве инструмента, как для создания (синтеза) и редактирования изображений, так и для оцифровки визуальной информации, полученной из реального мира с целью дальнейшей её обработки и хранения.
В эпоху постнеомодерна, то есть в нашу с вами, растут требования не только к функциональности, но и к эстетическому наполнению продукции, следовательно, участие дизайнера в создании продуктов потребления становится не только обязательным, но и растёт. Особенно емкими для данного вида дизайнерского обеспечения являются ниши дизайна мебели, ландшафтного, архитектурного. Хоть креативный компонент дизайна трудно формализуем, тем не менее, есть возможность разгрузить дизайнера от рутинной работы средствами графического программного обеспечения. Развиваются направления web дизайна, дизайна интерфейсов программного обеспечения.
4,5(15 оценок)
Ответ:
Yulduzka28
Yulduzka28
17.04.2022
Число повторений цикла = целая часть [(3-0.1)/0.1]+1 = 30

// PascalABC.NET 3.2, сборка 1383 от 09.02.2017

begin
  for var i:=1 to 30 do begin
    var x:=0.1*(i-1)+0.1; var y:=1-sin(x)/(1-ln(x+0.1));
    Writeln(x:3:1,y:15:5)
    end
end.

Результат
0.1        0.96174
0.2        0.90986
0.3        0.84579
0.4        0.77000
0.5        0.68267
0.6        0.58380
0.7        0.47331
0.8        0.35102
0.9        0.21667
1.0        0.06988
1.1       -0.08992
1.2       -0.26355
1.3       -0.45217
1.4       -0.65751
1.5       -0.88208
1.6       -1.12960
1.7       -1.40571
1.8       -1.71913
1.9       -2.08389
2.0       -2.52355
2.1       -3.08055
2.2       -3.83866
2.3       -4.98810
2.4       -7.06916
2.5      -12.45227
2.6      -75.39064
2.7       15.42904
2.8        6.17670
2.9        3.42616
3.0        2.07396
4,6(57 оценок)
Это интересно:
Новые ответы от MOGZ: Информатика
logo
Вход Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ