Найти сумму квадратов всех натуральных чисел от 1 до 100

Var
    i: integer;
    s: longint;

begin
    s := 0;
    for i := 1 to 100 do
        s := s + i * i;
    writeln(s);
end.

Образные модели (рисунки, фотографии) представляют собой зрительные образы объектов, зафиксированные на каком-либо носителе информации (бумаге, кинопленке). Широко используются образные информационные модели в образовании (плакаты по различным предметам) и науках, где требуется классифицировать объекты по их внешним признакам.

Знаковые информационные модели строятся с использованием различных языков (знаковых систем). Знаковая информационная модель может быть представлена в форме текста (например, программы на языке программирования), формулы, таблицы и так далее.

1.

#include <iostream>

int main()

{

   std::string str;

   std::cin >> str;

   std::cout << "Последняя цифра: " << str.back() << std::endl;

   std::cout << "Средняя цифра: " << str.at(str.length() / 2) << std::endl;

   return 0;

}

2.

#include <iostream>

#include <array>

int main()

{

   const std::array<std::string, 7> name_of_days

   {

       "Понедельник",

       "Вторник",

       "Среда",

       "Четверг",

       "Пятница",

       "Суббота",

       "Воскресенье"

   };

   size_t number_of_day;

   std::cin >> number_of_day;

   std::cout << "День: " << name_of_days[(number_of_day % 7)] << std::endl;

}