5.27 найти сумму всех целых чисел от 100 до 500 ( паскаль ) 5.28 найти произведение всех целых чисел от 8 до 15 ( тоже паскаль ) 5.29 найти среднее арифметическое всех целых чисел от 1 до 1000;

// PascalABC.NET 3.2, сборка 1417 от 28.03.2017
// Внимание! Если программа не работает, обновите версию!

begin
  Writeln(Range(100,500).Sum);
  Writeln(Range(8,15).Aggregate(1,(m,n)->m*n));
  Writeln(Range(1,1000).Average)
end.

Результат
120300
259459200
500.5

Соответственно 1, 2 и 3 задания

Признак 1. число делится на 7 тогда и только тогда, когда утроенное число десятков, сложенное с числом единиц, делится на 7.

Признак 2. число делится на 7 тогда и только тогда, когда модуль алгебраической суммы чисел, образующих нечётные группы по три цифры (начиная с единиц) , взятых со знаком «+», и чётных со знаком «-» делится на 7.

По первому признаку гораздо проще сделать.

На Бейсике вообще нефиг делать:

d-десятки, e-единицы:

d=n\10

e=n mod 10

if (3d+n) mod 7 =0 then ...

ИЛИ ВоТ ТАК

C++:

#include <iostream>

int n;

int main() {

   std::cout << "n=";

   std::cin >> n;

   std::cout << ( (div(n, 7).rem == 0) ? "делится" : "не делится" ) << '\n';

   return 0;

}

Анимация, сонымен қатар мультипликация-кино өнерінің бір түрі және оның шығармасы (мультфильм), сонымен қатар сәйкес технология.

Компьютерлік анимация - алдын-ала дайындалған графикалық файлдардың тізбектелген көрсетілімі (слайд-шоу), сонымен қатар объекттілер формаларын немесе тізбектелген суреттердің көрсетілімін өзгерту арқылы жүретін қозғалыстың компьютерлік имитациясы.

Анимация - қонақ үйлерде, корпоративті іс-шараларда, балалар лагерлерінде, балалар кештерінде бос уақытты ұйымдастыру; демалушылардың мәдени іс-шараларға жеке қатысуымен байланысты бағыт.

Анимация - ресейлік рок тобы.