Ой компьютер,
1. откройте контекстное меню объекта мой компьютер
расположенного на рабочем столе.
2. просмотрите список команд в контекстном меню объекта
мой компьютер.
3. выполните команду свойства в разделе общие открытого
диалогового окна, определите название операцион-
ной системы и имя пользователя.
4. закройте окно свойства.
5. два раза щелкните по объекту мой компьютер. опреде-
лите, какая программа была запущена.
6. определите, какие устройства хранения информации
подключены к компьютеру.
7. закройте окно мой компьютер.
8. откройте контекстное меню объекта корзина
расположенного на рабочем столе.​

                                             <Видеокарта>

1. Что делает видео карта? ответ: Выдаёт изображение.

2. Зачем она нужна? ответ: Она нужна чтобы выводить изображение.

3. Когда была создана видео карта? ответ: В 1981 Специалистами компании IBM

4. Почему видео карта сильно нагревается? ответ: Потому-что импульсы поступают в процессор видео карты и процессор нагревается.

5. Есть ли видео карта в планшетах,телефонах или процессор выводит картинку? ответ: Конечно есть! Только видео карта в телефонах,планшетах очень маленькая!

                                              <Аудио карта>

1. Зачем она нужна? ответ: Она выдаёт аудио сигнал в динамик.

2. Что она делает? ответ: Из информации (010101) Превращает в испульсные сигналы и передаёт их на динамик который уже воспроизводит звук.

3.В каком году она была изобретена? ответ: В 1857

4.Насколько она важна? ответ: Она важна так-как без неё мы бы не смогли слушать песни и т.д.

5. Есть ли она во всех устройствах? ответ: Да,конечно! Сейчас аудио карта даже в колонках есть!

Объяснение:

Вывод:Аудио и Видео карта очень важны для повседневной жизни.

Если n небольшие, то можно написать так:
var
  x, y, z, n: integer;
  disproved: boolean;
begin
  write('Введите n: ');
  readln(n);
  disproved := false;
  for x := 1 to 100 do
    for y := 1 to 100 do
      for z := 1 to 100 do
        if power(x, n) + power(y, n) = power(z, n) then
        begin
          writeln('Ферма ошибся! ', x, ' ^ ', n, ' + ', y, ' ^ ', n, ' = ', z, ' ^ ', n);
          disproved := true;
        end;
  if not disproved then
    writeln('Теорема не опровергнута');
end.
При больших n уже придётся использовать длинную арифметику.