Вычислить значение выражения

@vil20 · Регистрация: 21.12.2015

Студворк — интернет-сервис помощи студентам

Дан список из n целых неотрицательных чисел А1,А2,...,Аn. Найти: а) (А1+А2)*(А2+А3).....(Аn-1 + An);
б) (A1A2)modA3 + (A2A3)modA4 +.....+ (An-2An-1)modAn.

@JokeR.BY · 18.05.2016, 18:40

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
var
    a: Array[Byte] Of LongWord;
    n, i: Byte;
    zadA: Extended; //Double|Real
    zadB: LongWord;
begin
    {Генерация списка целых неотрицательных}
    Randomize();
    repeat
        Write('Input n=');
        ReadLn(n);
    until (n > 0);
    Write('Array A:');
    for i := 0 to n - 1 do
    begin
        a[i] := Random(100);
        Write(a[i]:3);
    end;
    WriteLn;
    {Задание А}
    zadA := 1;
    for i := 0 to n - 2 do
        zadA := zadA * (a[i] + a[i + 1]);
    WriteLn('ZadA=', zadA:0:0);
    {Задание Б}
    zadB := 0;
    for i := 1 to n - 2 do
        Inc(zadB, (a[i - 1] * a[i]) mod a[i + 1]);
    Write('ZadB=', zadB:0);
end.

Новые блоги и статьи Все статьи Все блоги /
Мой 7 минутный ролик с крамольным предложением про шахматы, предлагаю заценить _Ivana 18.07.2025 p2UhJNMGY94	Десять Middleware Node.js для эффективного кодинга Reangularity 18.07.2025 Когда я только начинал работать с Node. js, количество пакетов в npm меня буквально парализовало. Сегодня их больше 1,3 миллиона — попробуй разберись, что стоит твоего внимания, а что нет. Я потратил. . .	Context и глубины Android mobDevWorks 18.07.2025 В Android разработки Context напоминает воздух - он везде, жизненно необходим, но мало кто может детально объяснить его природу. Мы привыкли получать его как параметр, передавать дальше и. . .	Результаты исследования от команды MCM (июль 2025 г.) Programma_Boinc 18.07.2025 Результаты исследования от команды MCM (июль 2025 г. ) Как сообщалось в наших предыдущих публикациях, мы изучаем гены, которые имеют наибольший рейтинг и ассоциируются с различными видами рака, в. . .	ИИ-чатбот на React с OpenAI и LangChain.js Reangularity 17.07.2025 React давно стал для меня золотым стандартом фронтенд-разработки. Его компонентная структура, виртуальный DOM и однонаправленный поток данных идеально подходят для создания динамичных интерфейсов. . .
Пишем адаптер для локального хранилища S3 на C# stackOverflow 16.07.2025 Разработка современных приложений часто требует интеграции с объектными хранилищами, и Amazon S3 стал де-факто стандартом в этой области. Однако работа с облачными сервисами в процессе разработки. . .	Старые замки kumehtar 16.07.2025 Смотрел тут фото, попались пара старых замков. И сразу бросилось в глаза из отличие. Например: Замок Бистон, в англии. Разрушенное сооружение. Но - не испорченное людьми, по крайней мере - на. . .	Java и Eclipse Store: Сверхбыстрые приложения с In-Memory DB Javaican 15.07.2025 Eclipse Store — это микро-движок персистентности для Java, который позволяет хранить и извлекать нативные Java-объекты без необходимости преобразования данных или использования объектно-реляционного. . .	EmBitz, создание проекта, отладка, прошивка locm 15.07.2025 Создание проекта для Blue Pill (STM32F103C8T6) в EmBitz 2. 30, написания кода blink, запуск отладки в ОЗУ, заливка релизной прошивки во flash используя ST-Link и др. . . .	Трассировка корутин Kotlin с OpenTelemetry mobDevWorks 14.07.2025 Асинхронное программирование меняет правила игры, особенно когда речь заходит о трассировке операций. В Kotlin с его корутинами эта проблема приобретает особый оттенок, который я хотел бы детально. . .

@vil20 0 / 0 / 0 Регистрация: 21.12.2015 Сообщений: 25

	Вычислить значение выражения 17.05.2016, 13:32. Показов 1076. Ответов 1 Метки нет (Все метки) Дан список из n целых неотрицательных чисел А1,А2,...,Аn. Найти: а) (А1+А2)*(А2+А3).....(Аn-1 + An); б) (A1A2)modA3 + (A2A3)modA4 +.....+ (An-2An-1)modAn. 0

Опции темы

Вычислить значение выражения

Решение