Создайте программный код, который потребует ввести любые два числа a b и рассчитать: выражение (a + b)/b; (создать в паскале). Перед выводом результатов экран очищается, и реализуется пауза, чтобы были видны результаты. Цвет текста результатов черный, фон белый. Результаты выводятся в формате (результат: 8: 3). Возможный результат работы программы.

C++:

#include <bits/stdc++.h>

using namespace std;

int main() {

 long long a, b; cin >> a >> b;

 system("cls && color ")           < код цвета

 cout << (a + b) / b;

}

PASCAL:

var a, b, c: integer;

begin

 readln(a);

 readln(b);

 c:=(a+b)/b;

 ClrScr;

 textbackground(...);       < где троеточие вставляй код цвета

 textcolor(...);

 writeln(c);

end.

Объяснение:

Коды цветов в паскаль:

0   Black,         черный.   8   DarkGray,          темно-серый.          

1   Blue,           синий.   9   LightBlue,          ярко-синий.          

2   Green,        зеленый.  10   LightGreen,       ярко-зеленый.        

3   Cyan,         голубой.  11   LightCyan,        ярко-голубой.        

4   Red,          красный.  12   LightRed,         ярко-красный.        

5   Magenta,   фиолетовый.  13   LightMagenta,  ярко-фиолетовый.    

6   Brown,     коричневый.  14   Yellow,                 желтый.              

7   LightGray, ярко-серый.  15   White,                   белый

Важно для работы ClrScreen надо подключить модуль Crtl через use