1. Запустіть текстовий процесор Word, створіть новий документ. Знайдіть в Інтернеті три-чотири вірші одного з українських поетів і скопіюйте в документ. Якщо текст міститься в таб лиці — витягніть його. Для цього виділіть всю таблицю і виконайте: Конструктор → Дані → Перетворити на текст (розділювач — знак абзацу 2. Відформатуйте текст так, щоб рядки (крім першого) не починалися з но вого абзацу; видаліть порожні рядки; розмістіть назву вірша в окремому абзаці. 3. Введіть у першому абзаці назву збірки, наприклад «Вірші Т. Г. Шевченка». 4. Установіть для документа стиль Звичайний, для назв віршів — стиль Заголовок 1, для назви збірки — стиль Назва. 5. Знайдіть в Інтернеті портрет автора віршів і скопіюйте в документ після назви збірки. За потреби відформатуйте малюнок: обріжте, змініть розміри, обтікання, розташування, рамку тощо. 6. Створіть під портретом автора автоматизований зміст. 7. Перейменуйте створений Зміст на Зміст збірки. 8. Поділіть документ на розділи. Для цього після портрета й останнього рядка кожного вірша вставте розриви Поточна сторінка, а після змісту — розрив Наступна сторінка. 9. Установіть для всього документа міжрядковий інтервал — полуторний. Виконайте оновлення змісту. 10. Установіть у нижньому колонтитулі нумерацію сторінок. 11. Виберіть два-три слова з тих, що повторюються у віршах, і створіть покажчик. 12. Додайте до назви збірки посилання на сторінку, з якої копіювалися тексти віршів. Перевірте, чи працює посилання. Збережіть файл з іменем Практична робота 5 у відповідній папці. Завершіть роботу за комп’ютером.​

#include <iostream>
using std::cout;
using std::cin;
using std::endl;

int main()
{
   int n, m, counter = 0;

   cout << "Enter n: ";
   cin >> n;
   cout << "Enter m: ";
   cin >> m;

   if(n >= m)
   {
      cout << "Invalid value" << endl;
   }
   else
   {
      while(n <= m)
      {
         if(n % 4 == 0)
         {
            counter++;
         }
         n++;
      }
   }

   cout << counter << " value" << (counter != 1 ? "s" : "") << endl;

   cin.get();
   return 0;
}

Вывод:

Enter n: 2000

Enter m: 2012

4 values

На Паскале:

program test;
var n, m, counter: integer;

begin
  write('Enter n: ');
  readln(n);
  write('Enter m: ');
  readln(m);
  counter := 0;
  while n <= m do
  begin
    if n mod 4=0 then
      counter := counter + 1;
    n := n + 1;
  end;
writeln(counter, ' values');
readln();
end.

#include <iostream>
using std::cout;
using std::cin;
using std::endl;
#include <cmath>
using std::pow;
using std::sqrt;

double vpisannayaOkryzhnost(double);
double opisannayaOkryzhnost(double);

int main()
{
   double perimeter;

   cout << "Vvedite perimeter: ";
   cin >> perimeter;

   cout << "r vpisannoi okruzhnosti = " << vpisannayaOkryzhnost(perimeter) << endl;
   cout << "R opisannoi okruzhnosti = " << opisannayaOkryzhnost(perimeter) << endl;

   cin.get();
   return 0;
}

double vpisannayaOkryzhnost(double perimeter)
{
   double a = perimeter / 4;

   return (a / 2);
}

double opisannayaOkryzhnost(double perimeter)
{
   double a = perimeter / 4;

   return (sqrt(2) / 2 * a);
}

На Гэ-паскале можно написать так:

program math;
var perimeter, a: real;
begin
  write('Vvedite perimeter: ');
  read(perimeter);
  a := perimeter / 4;
  writeln('r vpisannoi okruzhnosti = ', a / 2:0:2);
  writeln('R opisannoi okruzhnosti = ', sqrt(2) / 2 * a:0:2);
  readln();
  readln();
end.