Составить блок схемы алгоритмов к следующим
задачам:
№1. Найти сумму ряда чисел от 1 до 100.
Полученный результат вывести на экран
№2. Посчитать сумму числового ряда от 0 до 14
включительно. Например, 0+1+2+3+...+14
3. Дано три числа. Найти количество
положительных чисел среди них

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

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

// 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.

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

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