#include <iostream>
using namespace std;
void main() {
setlocale(LC_ALL, "RUSSIAN");
char text, fon;
cout << "0 = Черный\t8 = Серый\n";
cout << "1 = Синий\t9 = Светло - синий\n";
cout << "2 = Зеленый\tA = Светло - зеленый\n";
cout << "3 = Голубой\tB = Светло - голубой\n";
cout << "4 = Красный\tC = Светло - красный\n";
cout << "5 = Лиловый\tD = Светло - лиловый\n";
cout << "6 = Желтый\tE = Светло - желтый\n";
cout << "7 = Белый\tF = Ярко - белый\n\n";
cout << "Введите цвет фона: ";
cin >> fon;
cout << "Введите цвет текста: ";
cin >> text;
switch (fon == text){
case true:{cout << "Невозможно поменять цвета."; }
case false:{
switch (fon){
case '0':{
switch (text){
case '1':{system("color 01"); break; }
case '2':{system("color 02"); break; }
case '3':{system("color 03"); break; }
case '4':{system("color 04"); break; }
case '5':{system("color 05"); break; }
case '6':{system("color 06"); break; }
case '7':{system("color 07"); break; }
case '8':{system("color 08"); break; }
case '9':{system("color 09"); break; }
case 'a':{}
case 'A':{system("color 0A"); break; }
case 'b':{}
case 'B':{system("color 0B"); break; }
case 'c':{}
case 'C':{system("color 0C"); break; }
case 'd':{}
case 'D':{system("color 0D"); break; }
case 'e':{}
case 'E':{system("color 0E"); break; }
case 'f':{}
case 'F':{system("color 0F"); break; }
}break;
switch (fon == text){
case true:{cout << "Невозможно поменять цвета."; }
case false:{
switch (fon){
case '1':{
switch (text){
case '1':{system("color 12"); break; }
}break;
}
}break;
}
}break;
}
}
cin.get(); cin.get();
}
}
}
Внимание! Если программа не работает, обновите версию!
№1
begin
var a:=ArrRandom(ReadInteger('n='),-50,50); a.Println;
Writeln('Количество отрицательных значений ',a.Where(t->t<0).Count);
end.
Пример
n= 15
3 39 3 2 43 43 -37 -2 -50 3 -25 15 -7 4 21
Количество отрицательных значений 5
№2
begin
var (m,n):=ReadInteger2('Количество строк и столбцов в массиве:');
Writeln('*** Исходный массив ***');
var a:=MatrRandom(m,n,-99,99);
a.Println(4); Writeln(4*a.ColCount*'-');
var k:=ReadInteger('k=');
if a.ElementsByRow.Any(t->t>k) then Writeln('Есть')
else Writeln('Нет')
end.
Пример
Количество строк и столбцов в массиве: 5 8
*** Исходный массив ***
-9 48 -98 -35 -33 -29 44 -32
-33 -48 -62 11 45 53 52 90
-96 -1 68 -21 15 -72 -78 -28
44 15 -53 -33 -27 89 -60 -49
28 -73 -99 81 23 -9 -93 -66
k= 92
Нет