98% что программу ты написал правильно, просто я Паскаль немного забыл , но основное помню
1 дискета
2cd rom
3 dvd rom
4 флеш
5 жесткий диск
После слова begin:
Переменной s присвоено значение 0.
Дальше идет цикл, повторяющийся 7 раз для значений k: 6,7,8, ... ,12
При каждом проходе цикла переменная s увеличивается на 10, т.е в результате она увеличится на 7 * 10 = 70.
Т.к. в начале она была равна 0, то в конце ее значение будет 0 + 70 = 70.
Тут же цикл, он повторяет дейтсвия...
Посчитай сам, каждый проход даёт +2 к S.