Pascal ABC, Turbo Pascal 7, Free Pascal, функции Pascal, Паскаль
function WhereY: byte;
Скачать Pascal ABC
Скачать Turbo Pascal