updating intro_course/task_5.f to f95