Поле имен, ряд формул, текущая клетка
Число из ячейки А1 возвести в степень (А3-В2) вот и все.
Http://yaforyou.ru/?q=%D0%AD%D0%BA%D1%81%D0%BF%D0%BB%D1%83%D0%B0%D1%82%D0%B0%D1%86%D0%B8%D0%BE%D0%BD...
Const
n = 10;
var
x: array[1..n] of integer;
i, k: integer;
begin
Randomize; { иниациализация датчика случайных чисел }
Write('Элементы массива: ');
k := 0; { обнулили счетчик }
for i := 1 to n do { цикл для перебора всех элементов }
begin
x[i] := Random(101); { очередное случайное число в диапазоне [0;100] }
if (x[i] mod 2) = 0 then k := k + 1; { если четное, +1 в счетчик}
Write(x[i]:5)
end;
Writeln;
Writeln('Количество четных чисел в массиве равно ', k)
end.
Тестовое решение:
Элементы массива: 70 19 4 83 79 30 92 97 33 71
Количество четных чисел в массиве равно 4
1)Стандартные - Paint, Блокнот.
2)Офисные - Их очень много, но перечислю основные: "Microsoft Office", "Evernote", "iWork", "Microsoft Word"
3)Если честно, не понял что написано, отпиши в комментариях, и я напишу программы.
4)Развлекательные - Steam, Shazam, вообще их очень много, подумай сам.
5)Профессиональные - Visual Studio, Process Hacker 2, Cheat Engine, VMProtect, и ещё куча многих других