1) Не хватка мощностей компьютера, либо он сильно загружен в данный момент, либо он серьезно "засран".
2) У вас скорее всего закончилось свободное место на диске. Рекомендую вам почистить диск в ручном или же в автоматическим режиме. А также можно купить еще один диск.
Запятые вокруг переменных во Writeln расставь =)
Строки в апострофах, переменные - без них, а всё это дело разделяется запятыми
Есть 2 вида плодов 1 вид фрукты второй овощи далее надо распределить их я точно сказать не могу потому что не вижу само задание