Надо сдать!
Рассчитайте объем видеопамяти необходимой для хранения цветного изображения размером 640X480 пикселей при условии что цвет каждого пикселя кодируется 3 байтами

// PascalABC.NET 3.3, сборка 1540 от 16.09.2017
// Внимание! Если программа не работает, обновите версию!

begin
  var s:=ReadlnString('Введите слово:').ToLower;
  var c:=ReadlnChar('Введите букву:').ToLower;
  if Pos(s[1],'аеёиоуыэюя')>0 then Writeln('Слово начинается с гласной')
  else Writeln('Слово начинается не с гласной');
  If s[1]=c then Writeln('Слово начинается с указанной буквы')
  else Writeln('Слово не начинается с указанной буквы')
end.

Примеры
Введите слово: Арбуз
Введите букву: к
Слово начинается с гласной
Слово не начинается с указанной буквы

Введите слово: Барабан
Введите букву: б
Слово начинается не с гласной
Слово начинается с указанной буквы

На индекс производительности Windows (важно понимать, что это оценочный тест встроенный в систему), колеблиться от 1.0 (минимальный бал) и до 7.9 (в Windows 7), или 9.9 (в Windows 8). В отсальных версиях таковой оценочный тест отсутствует, в Windows 8.1 тоже.

Критерии влияющие на результат теста:
- ОЗУ (оперативная память)
- ЦП (центральный процессор)
- Скорость записи на системный раздел (диск)
- Производительность видеокарты в 2D и 3D графики, отрисовки интерфейса - 2D графика и программах использующих 3D графику.