помогите составить программу турбопаскаль (без массива)

Привет – не вздумай обращаться за помощью к Георгию Зотикову – пусть он лучше расскажет правду как он мою подругу Лену кинул на деньги, а? Она ему заплатила за контрольную – и с концами……